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sabe como €& importante 





As abelhas não precisam 

de computador para produzir, 
armazenar e distribuir o produto 
do seu trabalho. 

Mas, como nos falta esse instinto 
profundo e maravilhoso com que 
a Natureza dotou as abelhas, 
recorremos a poderosos meios de 
Informática para racionalizar 

a produção. 








a solucao informática 


racionalizar a producao. 





A TELEMÁTICA ajuda as Empresas 
modernas com cálculos prévios e 
exactos sobre as suas necessidades, 
de modo a determinar os seus 
processos de trabalho, com menos 
custos e melhores resultados. 

A TELEMATICA dispõe de recursos 
tecnológicos e humanos que permitem 
a uma Empresa, tal como as abelhas, 
tirar o melhor partido do seu esforço. 
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editorial 


— Artigos de imprensa, declarações de políticos... A escolha pelos CTT/TLP 
de centrais telefónicas de comutação digital, tornou-se um verdadeiro negó- 
cio de Estado. Mas além das pressões existe a técnica... 

E quem melhor para vos falar dessa técnica do que a Alcatel Thomson, um 
dos vencedores do concurso para a instalação das Centrais em Portugal. 

Quais as necessidades da rede telefónica nacional, características das 
centrais digitais, manutenção e benefícios para o assinante, são alguns dos 
pontos desenvolvidos num esclarecedor artigo que abre este número da 
Software. 


— “Os defensores do LOGO afirmam que as bases fornecidas pelo estudo 
inicial desta linguagem, são mais apropriadas a um futuro brilhante na pro- 


gramação do que as produzidas pelo BASIC”. 
Eis uma das razões que nos levou a querer saber mais sobre esta lingua- 
gem, e que o leitor também passará a conhecer melhor. 


— Numa fase de euforia a nível de exposições de informática — foi a ENIC, é 
a INFORPOR em Dezembro e a FILEME em Janeiro/86 — a Software, sempre 
presente, dá-lhe uma panorâmica da forma como decorreu aquela primeira 
mostra. 


Três temas fortes que escolhemos para lhe “aguçar o apetite”. 
Bom trabalho e boa leitura. 


Saudações Informáticas 
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BULA ARVORE 
DA COMUNICAÇÃO. 


BULL, primeiro construtor europeu de informática 
e de burótica, propõe às empresas uma oferta coerente 
nos quatro domínios da informação. 

No domínio da informática geral, BULL DPS é uma 
gama muito vasta de pequenos, médios e grandes sistemas 
evolutivos cada um numa relação de potência de 1 a 40, 
cujos logiciais de exploração GCOS garantem a perenidade 
do vosso investimento em programação. 

Para a informática científica e técnica, BULL pro- 
põe uma gama de mini e super mini-computadores, sofisti- 
cados e potentes, os BULL SPS, particularmente destina- 
dos às aplicações da indústria e da investigação. 

A informática e a burótica distribuidas beneficiam 
das novas gerações de terminais e de estações multi-fun- 
ções polivalentes e ergonómicas, BULL Questar. 




















Informática Cientifica 
geral e tecnica 

BULL DPS 

BULL BULL 

QUESTAR MICRAL 
Informática; 
burótica Micro-informatica 
distribuídas profissional 


Na micro-informática profissional, BULL Micral re- 
presenta uma família performante de micro-computadores 
multipostos ou monopostos de compatibilidade multipla 

Graças à arquitectura de rede DSA, conforme com 
as normas internacionais, todos estes sistemas podem ct 
municar em redes homogéneas ou heterogeneas 
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A solução Alcatel Thomson 


Artigos de imprensa, declara- 
ções de políticos... A escolha pe- 
los CTT/TLP de centrais telefônicas 
de comutação digital, tornou-se 
um verdadeiro negócio de Esta- 
do. Mas alêm das pressões, existe 
a técnica. Foi ela que ditou a de 
cisão dos especialistas a favor, 
nomeadamente dos equipamen- 
tos do Grupo Francês ALCATEL 
THOMSON. 

Decisão justificada? Foi o que 
tentâmos saber. 

As centrais concebidas e desen- 
volvidas pela ALCATEL THOMSON, 
lider mundial em comutação digji- 
tal, puseram à prova as suas quali 
dades, em 49 países do mundo. 

Os equipamentos que o Grupo 
propõe para Portugal são, con- 
vem ter presente, os mesmos que 
foram escolhidos pela Administra- 
ção dos PTT franceses assim como 
por 18 países estrangeiros, para 
equipar as suas redes telefônicas. 

Na sua versão “Centros de Trân- 
sito Internacionais”, situam-se no 
primeiro rang' mundial no que 
respeita ao número de centros em 
serviço e encomendados. 


UMA RESPOSTA A TODAS AS NE- 
CESSIDADES DE UMA REDE TELE- 
FÔNICA NACIONAL 


Os sistemas telefônicos digitais 
propostos para Portugal pela AL- 
CATEL THOMSON, destinam-se às 
aplicações de trânsito urbano na- 
cional e internacional com opera- 
doras, de assinantes, combinadas 
e de trânsito com operadoras. 

A sua capacidade de escoa- 
mento de tráfego é muito superior 
à dos sistemas baseados nas ve 
lhas tecnologias: a sua rede de li 
gação pode suportar 20.000 co- 
municações simultâneas com 
uma probabilidade de bloqueio 
práticamente nula. O comando 
por computador (SPC), permite a 
reconfiguração automática das 


Mil 


CENTRAIS TELEFÔNICAS DE COMUTAÇÃO DIGITAL 


vias de transmissão, em função da 
sua disponiblidade e da quanti- 
dade de tráfego. Por outro lado, 
um sistema de taxação altamente 
evoluído, com possibilidade de 
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Unidade de ligação de assinantes 


facturação detalhada, faz com 
que os sistemas telefônicos de co- 
mutação digital se tornem um in- 
vestimento muito rentável. 

Previsto para ser instalado em 
meio urbano, o auftocomutador di- 
gital de assinantes ou combinado 
assinantes/trânsito de grande ca- 
pacidade da ALCATEL THOMSON 
escolhido pelos CTT/TLP, permite 
uma capacidade de ligação até 
65.000 assinantes. As zonas perifé- 
ricas de menor densidade, pode- 
rão tambêm ser servidas, uma vez 
que o referido autocomutador 
possui uma unidade de ligação 
distante de assinantes, de que re- 
sulta um crescimento do raio de 
acção e a certeza de rentabilizar 
em qualquer caso, a infra-estrutu- 
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CARATERÍSTICAS GERAIS 


As centrais telefônicas digitais 
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ALCATEL THOMSON sobre as quais 
se fixou a escolha dos CTI/TLP, 
compreendem quatro tipos de 
unidades funcionais: 


— a rede de ligação (UCX) poden- 
do suportar de 32 a 2048 jun- 
ções MIC ou seja 65.000 vias te- 
lefônicas ou de sinalização, pa- 
ra uma capacidade de escoa- 
mento de tráfego de 150 a 
20.000 erlangs. 


Esta rede é unidireccional (a 
transmissão das informações tele- 
fônicas faz-se sempre no mesmo 
sentido), dobrada (vias de entra- 
da e de saída ou bidireccionais li- 
gadas da mesma maneira), dividi- 
da em dois ramos independentes 





que partilham entre si as chama- 
das. 

A sua velocidade de funciona- 
mento interno é de 4 Mbit/s. 

A unidade de comando (UCD) 
constituida por dois computado- 
res centrais micro-programados, 
com “palavras” de 32 bits funcio- 
nando em regime de partilha de 
carga, podendo proceder ao tra- 
tamento de 350.000 tentativas de 
chamada, na altura em que se ve 
rificar uma sobrecarga de tráfe- 


go. 
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PCM TRUNKS — 
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sistema, 

Este Logicial & certamente um 
dos pontos fortes das centrais tele- 
fônicas digitais ALCATEL THOM- 
SON. Seguro e altamente potente, 
apresenta grande possibilidade 
de evolução graças ao reagrupa- 
mento em sulb-conjuntos funcio- 
nais (SEF), dos programas que de- 
pendem únicamente de um nú- 
mero limitado de parâmetros: 
qualquer evolução tecnológica 
que se torne necessária para au- 
mentar as suas possibilidades de 


PCM DISTRIBUTION 
< 512 PCM 


SWITCHING UNIT (UCX:) 










| [BRANCH BO, BI 


ê 
E 


Pv | SSORS A, 8 
MULTICCRD CIRCUIT 
SPEEU! CONTINUITY CHECK 








PE | PERIPALRAL INTERFACE 
| commom OPERATING PERIPHERALS 





A unidade de sinalização (USI) 
agrupa os órgãos de recepção ou 
de emissão da sinalização de e 
para as centrais distantes (sinais 
de linha e de registadores). Estes 
sinais são submetidos a um trata- 
mento preliminar atravês de um 
microprocessador antes de serem 
enviados à unidade de comando. 

A unidade de adaptação (UAD) 
constitui a interface entre os aces- 
sos analógicos de linhas de assi 
nantes e de circuitos 2 ou 4 fios, e 
as junções MIC ao “coração” do 

















ABBRE VIATIONS USED 


| S [| TIME-DIVISION MULTIPLEXED SELECTOR 
| BAP | TELEPHONE PERIPHERAL ACCESS BUS | SB | BRANCH SELECTION 
CA,CB | SG | GROUP SELECTION 
[e a TR | TRANSMISSION ADAPTAT ON 
PPC 


| TRC | TRANSCOD ING 
| UAP | PERIPHERAL ACCESS UNIT 


CT | TIM -DIVISION SWITCHING UNIT 
Gr TIME-DIVISION TRUNK GROUP 
IC SW ITCHING INTERFACE 









| PrM | PROGRAMMED MARKING PLK IPHEKAL 


















URA | SUBSCRIGR CONNECTION UNIT 
UR J | ANALOG TRUNK CONHECTUR UNIT 
a TIRO UM 
PPA | FROGRAMMEL ALARM PERIPHERAL 








aplicação, só influenciará zonas 
restritas do logicial global. 


UMA MANUTENÇÃO SEM HISTO- 
RIA 


As funções de manutenção ofe- 
recidas pelas centrais digitais AL- 
CATEL THOMSON escolhidas pelos 
CTI/TLP, são particularmente inte 
ressantes. 

Detecção e localização das fa- 
lhas do equipamento interno na 
central: os equipamentos de con- 


(1) DIRECT LINK WITHOUT SG (Z)LINK VIA SG > 512 PCM 


FIGURE 1 - MT 20/25 SYSTEM 
DIAGRAM OF TRUNKS WITH 
SUBSCRIBER CONNECTION 





destaque 


trolo passivo e activo, permitem 
detectar se uma comunicação se 
estabelece correctamente. Em 
caso de erro, à unidade de co 
mando duplicada, determina a 
localização da unidade de segu 
rança em causa e isola-a do tráfe- 
go. 

Ensaio das junções e das linhas 
de assinantes: os equipamentos 
que permitem o ensaio das linhas 
de assinantes ligadas à central, 
são comandados a partir de um 
teleimpressor especializado. Os 
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CONTROL UNIT 
(UCD) 











dispositvos de ensaio das junções 
BF (baixas frequências) permitem 
ao operador efectuar a supervi 
são dos juntores, o comando dos 
ensaios automáticos e os ensaios 
manuais das junções. 


O CONFORTO DO ASSINANTE 


O primeiro beneficiário das faci- 
lidades oferecidas pelas centrais 
telefônicas digitais ALCATEL TOHM- 
SON será o assinante português, 
que terá acesso a um grande le 
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Distância não significa tempo. 
É necessário chegar a qualquer ponto do 
globo, em qualquer momento e com a fiabi- 
lidade que só um sistema tecnológico evo- 
luído permite. 

É preciso comunicar. 

E este é o objectivo dos CTT e dos TLP ao 
criarem o SERVIÇO PUBLICO DE COMU- 
NICAÇÃO DE DADOS, através da formação 
do Consórcio Transdata destinado à explo- 
ração e comercialização dos novos serviços 
telemáticos. 

Permitindo a troca fácil e eficaz de comuni- 
cação — Bancos, Seguros, Turismo, Trans- 
portes, Indústria, Administração Pública, 
Farmácias —terão acesso a bases de dados, 
tratamento de “stocks”, correio electrónico, 
cálculo científico e industrial. 

A rede TELEPAC, associando a economia 
de exploração à optimização de recur- 

sos de transmissão, ligando todo o 
mundo, transforma o SERVIÇO 
PÚBLICO DE COMUNICAÇÃO 

DE DADOS num instrumento 
indispensável para uma 
comunicação inteligente. 


LISBOA 


Av. Fontes Pereira de Melo, 38-9.º ai | 

1000 LISBOA — Aiii = 
Tel.: 540020 - Telex: 64200 
Loja: Forum Picoas 





Tel.: 324646 - Telex: 22150 SERVIÇO PÚBLICO DE COMUNICAÇÃO DE DADOS 
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que de serviços, muito deles hoje 
ainda desconhecidos: telefones 
com marcador rotativo e de te- 
clas decimais ou MF (frequência 
CCITN, serviço reduzido, despertar 
automático, registo de chamada, 
reenvio temporário, assinante au- 
. sente, chamadas de conferência, 
indicação de chamada com prio- 
ridade, linha essencial, factura- 
ção detalhada, identificação das 
chamadas mal intencionadas, 

Há ainda a possibilidade de in- 
troduzir outras facilidades para os 
assinantes, isto no caso da Admi- 
nistração dos CTI/TLP o desejar. É 
ainda necessário sublinhar, que 
estas centrais podem adaptar-se 
a todos os planos de numeração 
e a todos os planos de encami- 
nhamento, oferecendo uma gran- 
de possibilidade de escolha de 
métodos de taxação diferentes, 
para as chamadas locais, interur- 
banas e internacionais. Um registo 
detalhado para cada chamada 
interurbana ou internacional, po- 
derá ser fornecido aos assinantes 
que tiverem direito a esse serviço. 

Outra vantagem do sistema & o 
facto do mesmo poder ser integra- 
do em todos os suportes de trans- 
missão estando concebido para 
tratar os sistemas de sinalização 
CCITT assim como as suas varian- 
tes nacionais. 


O FUTURO EM LINHA 


A introdução da unidade de li- 
gação de assinantes de terceira 
geração que permite a ligação 
digital a 64 Kbit/s e a utilização do 
código de sinalização N.º 7, para 
o qual as centrais telefônicas digi- 
tais ALCATEL THOMSON estão já 
preparadas, permitir-lhes-a res 
ponder a todas as necessidades 
da Rede Digital com Integração 
de Serviços (transmissão simultá- 
nea numa linha telefônica, da 
voz, dos dados, do texto, etc...) 

A França, pioneiro mundial nes- 
te domínio, utiliza evidentemente 
os equipamentos desenvolvidos 
pela ALCATEL THOMSON para as 
experiências em grandeza real 






























































Unidade de sinalização 


que está a realizar actualmente, 
na sua Rede Telefônica Digital. 
Com a comutação digital e as 





centrais digitais ALCATEL THOM 
SON, os CTI/TLP, vão “colocar o fu- 
turo em linha”. L! 





Filtro digital 
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PASCAL 


introdução 


Um dos métodos de desenvolvi- 
mento de algoritmos mais utiliza- 
do é sem duvida a analise top- 
-down (traduzido à letra: de cima 
para baixo; mais correctamente: 
do geral para o particular). 

Este método consiste em ir refi- 

nando progressivamente uma so- 
lução para um problema em ni- 
veis sucessivos de particulariza- 
ção. O desenho do algoritmo co- 
meça pela sua divisão em vários 
blocos, a definição da função de 
cada um dos blocos e a definição 
da forma como deve ser enca- 
deada a sua execução. Cada 
bloco constitui uma unidade es- 
tanque podendo a ele aplicar-se 
o mesmo processo global: dividi- 
lo em sulb-blocos. Este processo 
vai-se aplicando sucessivamente 
atê se chegar a um nível em que 
os blocos apresentam um conjun- 
to de operações que, dada a sua 
simplicidade, não necessitam de 
ser decompostas em outras inter- 
médias. Assim os blocos dos níveis 
superiores ocupam-se com os pro- 
blemas de um forma geral, en- 
quanto que os blocos dos níveis in- 
feriores lidam com os detalhes. 
Nos blocos intermédios assiste-se 
à passagem progressiva de uma 
abordagem global para uma 
preocupação crescente com os 
pormenores. 
Este modo de decompor um pro- 
blema está directamente ligado a 
nossa incapacidade de abarcar 
simultaneamente uma grande 
quantidade de informação. Por 
esta razão os nossos raciocínios 
são estruturados em níveis. 

Ora, a ideia de uma linguagem 
de programação evoluída é facili- 
tar a comunicação entre o Ho- 
mem e o computador o mais pro- 
xima possível da forma como 
usualmente estrutura os seus racio- 
cínios. Por isso o Pascal apresenta 
um a hierarquização por meio de 
uma estratificação em níveis. 

Assim, um programa em Pascal 
é divido em vários blocos designa 
dos por procedimentos (Procedu- 


re). Um procedimento não é mais 
do que um conjunto de instruções 
que, ao ser executadas produzem 
determinadas acções tal e qual 
como os programas que temos vis- 
to neste curso. 

A cada procedimento damos 
um nome que deve caracterizar a 
acção que desempenha (tal co- 
mo atribuimos nomes sugestivos 
aos programas que fizemos). Sem- 
pre que no programa é necessá- 
rio executar essa acção em vez 
de incluirmos as instruções neces- 
sárias, basta especificar o nome 
do procedimento. Assim o progra- 
ma principal apenas exprime em 
termos gerais a sequência de ac- 
ções a realizar e não os pormeno- 
res dessas acções; esses são dei- 
xados para os procedimentos. 


Procedimentos 


Nesta secção é apresentado o 
desenvolvimento de um progra- 
ma, recorrendo à sua divisão em 
procedimentos. Nela o leitor po- 
derá encontrar a concretização 
das ideias apresentadas na intro- 
dução. Essas ideias provavelmen- 
te afiguraram-se-lhe um pouco ari- 
das embora eu pense serem ne- 
cessárias para encarar de uma 
forma natural o aparecimento dos 
procedimentos em Pascal. 

O problema aqui abordado po- 
de ser solucionado por meio de 
um algoritmo muito utilizado 
quando não se conseguem em 
contrar outros mais eficientes (po- 
de parecer um pouco contraditó- 
rio mas muitas vezes não se conse- 
guem arranjar bons algoritmos 
para a resolução de certos pro- 
blemas). 

O problema a resolver é o se 
guinte ("): 


Gerar uma sequência de n ca- 
racteres de um conjunto com 3 
caracteres A, Be C tal que não 
contenha nenhum par de subse- 
quências adjacentes iguais. 


Por exemplo, supondo n=ó6, as 


sequências ABCABA e ABCBAC 


FERNANDO GARCIA 


são válidas enquanto que as se- 
quências AABCAB (tem dois A's se- 
guidos) e ABCABC não são váli 
das. 

O algoritmo utilizado consiste 
em gerar sistemátimcamente uma 
sequência de caracteres, acres- 
centando caracter a caracter, e 
testá-la para verificar se obedece 
as condições especificadas, sen- 
do modificada no caso de não 
obedecer. 

O processo inicia-se com uma 
sequência vazia. O passo seguin- 
te consiste em acrescentar, um a 
um, caracteres à sequência. Ca- 
da vez que um caracter é acres- 
centado há que verificar se esta 
obedece às restrições impostas. 
No caso afirmativo a sequência 
atê ao momento é válida e pode 
de novo ser acrescentada. Caso 
contrário é considerada não váli- 
da e tem que se modificar. O algo- 
ritmo termina quando o compri 
mento de uma sequência válida 
for igual a n. 


Portanto as condições iniciais 
são: 
sequencia/lcomprimento] : = 
succ(sequenciafcomprimento)) 


A segunda ê um pequeno artifi- 
cio útil na simplificação do algorit- 
mo. 


O corpo do algoritmo é: 


REPETIR 

SE válida ENTAO acrescentar 
SENAO modificar 

ATE comprimento igual a n E válida 


No final há que imprimir a se” 
quência encontrada: 


Imprimir 


Nesta primeira aproximação 
não sabemos ainda como vamos 
prodecer para acrescentar, modi- 
ficar e verificar a sequência, assim 
como para a imprimir. No entan- 
to, se consideramos que estas ac- 
ções são efectuadas por procedi- 
mentos, exactamente com aque- 
les nomes, podemos imediata- 


/ 
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cont. PASCAL 


comprimento := 0; 
valida := true; 
REPEAT 


IF valida THEN acrescentar 
ELSE modificar; 
verificar 
UNTIL (comprimento =n) AND valida; 


- Neste conjunto de instruções 

aparece uma coisa nova: uma va- 
riável lógica — válida. Uma variár- 
vel lógica pode assumir apenas 
dois valores: falso (false) ou verda- 
deiro (true) — ou sim ou não, ou O 
OU 1... 

Assim, e no caso presente, a va- 
riável válida indica apenas uma 
de duas coisas: a sequência ou é 
válida (válida = true) ou não é váli- 
da (válida = false). 


A lógica a dois valores foi estru- 
turada por um matemátrico de 
nome Boole e por isso é corrente 
apelidá-lia de booleana. Dal a de- 
claração em Pascal: 

valida : boolean; 

A sequência de caracteres é 
uma lista, de caracteres, cuja di 
mensão, n, é conhecida à parti 
da. Em Pascal pode ser represen- 
tada por um array de caracteres: 
sequencia : ARRAY [1..n] OF char; 

Atê este momento definimos a 
forma como representar os dados 
e a estrutura geral do processa- 
mento. Estamos pois na posse dos 
elementos necessários para escre- 
ver a parte do programa de de- 
claração do dados e o programa 
principal: 


PROGRAM sequencias (output); 


CONST 

A = 6; 

VAR 

sequencia : ARRAY [1..n] OF char; 
comprimento : O..n; 

valida : boolean:; 





BEGIN 

comprimento := 0; 
valida := true: 
REPEAT 


IF valida THEN acrescentar 
ELSE modificar; 
verificar 
UNTIL (comprimento =n) AND valida; 
imprimir 
END. 


Passando à fase seguinte vamos 
desenvolver os procedimentos. 


A acção de acrescentar a sequên- 
cia é muito simples, é apenas qau- 
mentar de um o seu comprimento: 


comprimento: = comprimento + 1; 


e escolher o novo caracter para 
extender a sequência. Para siste- 
matizar a geração da sequência 
o caracter escolhido é sempre o 
primeiro do conjunto dos possi- 
veis: 


sequenciafcomprimento] := "A 


O procedimento acrescentar é 
pois: 


PROCEDURE acrescentar; 
BEGIN 
comprimento := comprimento + 1; 
sequencialcomprimento] := “A' 
END 


O modificar a sequência é efec- 
tuado quando o último caracter 
acrescentado conduz a uma se- 
quência não válida. Portanto, 
consistirá em trocar esse caracter 
por outro, dos possíveis, com o in- 
tuito de verificar se este já conduz 
a uma sequência correcta. Tam- 
bém para sistematização troca-se 
sempre pelo caracter seguinte, ou 
seja, pelo seu sucessor no conjun- 
to dos caracteres possiveis: 


sequencia[comprimento] : = 


succ(sequencialcomprimento)) 


A função succ() (successor) dã o 
sucessor, isto é, o caracter que se 
encontra imediatamente a seguir, 
segundo uma ordem pré-defeni- 
da — numérica para os caracter 


de 0 a 9 e alfabética para os 
caracteres de A a Z. 

Claro que quando se chega ao 
Ultimo caracter do conjunto, 'C, 
temos que parar. Neste caso a 
conclusão é esta: se, qualquer 
que seja o caracter final experi 
mentado, a sequência não é váli- 
da, então há que retroceder, ir ao 
caracter anterior, trocá-lo por ou- 
tro e ver se assim se chega já a 
uma sequência válida. Mas pode 
ainda acontecer que o caracter 
anterior seja também o último. 
Ora, enquanto isso acontecer tem 
que se retroceder: 


WHILE sequenciafcomprimento] = 'C'DO 
comprimento := comprimento - 1; 


O procedimento modificar é 
portanto: 


PROCEDURE modificar; 


BEGIN 
WHILE sequencialcomprimento] = 'C'DO 
comprimento :=comprimento-1; 
sequenciafcomprimento] := 
succ(sequenciajcomprimento)) 
END 


Convém aqui notar que o método 
sistemático como se vai gerando 
a sequência assegura que não há 
nenhum arranjo possível dos sim- 
bolos que seja esquecido. Por ou- 
tro lado não se limita a gerar to 
dos os arranjos possiveis, pelo 
contrário, actua de uma forma in- 
teligente: sempre que se conclui 
que um certo símbolo não pode 
ocupar uma determinada posi 
ção, porque não conduz a uma 
solução, não se testam mais ne 
nhumas sequências com esse sim- 
bolo nessa posição, troca-se ime- 
diatamente pelo símbolo seguin- 
te. 

Para que o leitor possa verificar 
que realmente é assim proponho 
-lhe que faça o papel do proces 
sador, para o programa em ques- 
tão, durante algumas iterações 
escrevendo as sul-sequências 
que vai gerando. 

A verificação da validade da 
sequência foi deixada inteiramen- 
te para o procedimento verificar. 
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cont. PASCAL 


Dada esta separação, derivada 
do modo de desenvolvimento do 
algoritmo, é possível por simples 
substituição deste procedimento 
gerar outras sequências com ou- 
tro tipo de restrições que as atrás 
enunciadas. Atê ao momento o 
programa possui um caracter bas- 
tante geral. 

O procedimento verificar tem 
que ver se a sequência contêm al- 
gum par de subsequências ada- 
jacentes iguais. Para isso tem que 
comparar todos os pares de sub- 
-sequência adjacentes de compri- 
mento igual a 1 (não pode haver 
dois caracteres iguais seguidos ) 
2, 3,..., atê n/2 (as subseguências 
adjacentes mais extensas são as 
duas metades da sequência). 

Note-se que se encontram duas 
subsequências adjacentes iguais 
não vale a pena continuar a com- 
paração, a sequência que as 
contêm pode ser imediatamente 
dada como não válida. 

Esquecendo por enquanto co- 
mo se vão comparar as duas sulo- 
sequências temos qualquer coisa 
como: 













BEGIN 
subcomp := 
valida := 






subcomp + 1; 


END 


Como é evidente metade é igual 
à divisão inteira n/2, o que em Pas- 
cal é indicado por: 

metade := comprimento div 2; 

Notemos ainda que, quando se 
acrescenta um caracter à se 
quência, se sabe à partida que 
ela atê ao momento era válida. 
Por isso não vale a pena compa- 
rar todas as sulbsequências adija- 
centes de determinado comepri- 


mento, basta comparar as que coipla b 


contêm o caracter acrescentado. 
Assim, para cada comprimento 


valida := true; 
subcomp := 0; 
metade := comprimento div 2; 


WHILE valida AND (subcomp< metade) DO 


“Todas as subsequêéncias adjacentes 
de comprimento subcomp são diferentes” 


hã só a comparação de um par 
de subsequências. 

A comparação de duas subse- 
quências adjacentes de compri- 
mento subcomp pode ser feita 
atravês de um ciclo que compara 
por ordem os caracteres que as 
compõe. Para que as subsequên- 
cias sejam diferentes basta existir 
um par de caracteres diferentes. 
Se tal acontecer não vale a pena 
continuar a comparar os próximos 
caracteres e, nestas condições, o 
ciclo deve parar antes de chegar 
ao fim das subsegquências. 

Traduzindo este raciocínio te- 
mos: 


ordem := 0; 





Os indices do array podem pa- 
recer um pouco complicados. 


Contudo, se o leitor reflectir um 
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sequencialcomprimento-subcomp-ordem]; 


REPEAT 
valida := sequencialcomprimento-ordem] = 
ordem := ordem + 1 


UNTIL valida OR (ordem =subcomp) 
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racteres da sulbsequência (de 
comprimento subcomp) no fim da 
sequência com a ajacente. 
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cont. PASCAL 


Deste modo chegamos ao pro- 
cedimento verificar: 


PROCEDURE verificar: 


BEGIN 
é valida := true; 

subcomp := 0; 

metade := comprimento div 2; 

WHILE valida AND (subcomp< metade) DO 
BEGIN 
subcomp := 
ordem := 0; 
REPEAT 

valida := sequencialcomprimento-ordem] = 
sequenciafcomprimento-subcomp-ordem]; 
ordem := ordem + 1 
UNTIL valida OR (ordem =subcomp) 
END 
END; 


subcomp + 1; 


O procedimento imprimir, dada 
a sua simplicidade não é tratado 
em pormenor. 


Juntando tudo temos o progra- 


ma: 
LE cmd 
Aconselho ainda o leitor a reler 


a secção anterior, depois de com- 
preender e por funcionar este pro- 
grama, a fim de consolidar as no- 
ções nela apresentadas. A boa ou 
má estruturação de um programa 
determina drasticamente a sua 
compreensão, adaptação a ou- 
tras tarefas semelhantes aquela a 
que inicialmente era destinado, 
funcionalidade, transportabilida- 
de (poder por-se a funcionar nou- 
tro computaodr que não aquele 
onde foi feito),..., enfim a utilidade 
do programa. 


Exercício: 


Modifique o programa de modo 
a gerar, não apenas uma, mas to- 
das as sequências de comprimen- 
to n que não contenham subse- 
quências adjacentes iguais. 

Dada a boa estruturação do 
programa esta tarefa é relativa 
mente simples. 


(9 in Niklaus Wirth, Programação 
sistemática em Pascal 








curso [7] 


PROGRAM sequencias (output); 


CONST 
“= e 
VAR 


sequencia : ARRAY [1..n] OF char; 
comprimento, ordem, subcomp, posicao : O..n; 
metade : 1..n; 

valida : boolean; 


PROCEDURE acrescentar: 


BEGIN 
comprimento := comprimento + 1; 
sequenciafcomprimento] := “A' 
END; 


PROCEDURE modificar; 


BEGIN 

WHILE sequencialcomprimento]='C' DO 

comprimento := comprimento - 1; 
sequenciafcomprimento] := succ(sequencialcomprimento)) 
END, 


PROCEDURE verificar; 


BEGIN 
valida := true; 
subcomp := 0; 
metade := comprimento div 2; 
WHILE valida AND (subcomp< metade) DO 
BEGIN 
subcomp := subcomp + 1; 
ordem := 0; 
REPEAT 
valida := sequencialcomprimento-ordem] = 
sequenciafcomprimento-subcomp-ordem!]; 
ordem := ordem + 1 
UNTIL valida OR (ordem =subcomp) 
END 
END; 
PROCEDURE imprimir; 
BEGIN 
FOR posicao := 1 TO n DO 
write (sequenciafposicao]) 
END; 


BEGIN |sequencias; 


comprimento := 0; 
valida := true; 
REPEAT. 


IF valida THEN acrescentar 
ELSE modificar; 
verificar 
UNTIL (comprimento =n) AND valida; 
imprimir 
END. 








FICHEIROS 


O programa que apresento, ela- 
bora pequenos ficheiros que po- 
dem ser relativos a pessoas ou a 
quaisquer outras matérias e são 
ordenados alfabéticamente a 
partir do nome. 

A cada nome poderá fazer cor- 
responder um pequeno conjunto 
de dados de identificação que, 
segundo a estrutura do programa, 
não deverá exceder os 192 carac- 
teres (6 linhas): por sua vez, o no- 
me não deverá exceder os 25 ca- 
racteres. 

Em principio, o número de fichas 
ou registos não deverá exceder os 
150 com vista a salvaguardar al- 
guma RAM livre. 

As dimensões do ficheiro são de- 
finidas na linha n.º 1084, onde N & 
a variável indexada que contêm 
os nomes e D é a que contêm os 
dados. 

Se, por qualquer motivo, desejar 
aumentrar o n.º de caracteres (ou 
capacidade) da variável que 
contêm os dados, terá que a redi- 
mensionar, diminuindo o n.º de re- 
gistos e aumentando o n.º de ca- 
rateres em D. 

Se, por outro lado, desejar au- 
mentar o n.º de fichas terá que di- 
minuir O n.º de caracteres atribul- 
dos aos dados. 
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Estes ficheiros podem ser guar- 
dados em cassefte de duas ma- 
neiras: 

1) Gravados, independente- 
mente do programa como ar 
rays . 

2) Gravados juntamente com o 
programa. 

Estas operações são efectuadas 
a partir das opções fornecidas 
com o programa, 

Se desejar atribuir os seus pró 
prios nomes ao programa ou aos 
“arrays” a gravar, proceda do se- 
guinte modo: 

1) Gravar sômente os ficheiros: 

Edite as linhas n.º 500, 510, 6/0 
e 680 e atribua os nomes pretendi- 
dos. 

2) Gravar juntamente com o pro 
grama: 

Edite a linha n.º 630 e proceda 
como anteriormente, 

Pode também, se assim o dese- 
jar, gravar sômente o programa 
(sem os ficheiros). 

Notas: 

Se, ao emendar os dados (op- 
ção 7), tiver que apagar espaços 
(tecla E) e o último caracter da 6.º 
linha de dados aparecer repetido 
após ter realizado a operação, 
não se preocupe, pois isso desa- 
parece quando se faz a listagem 
normal (opção 4). 
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ANTÓNIO TAVARES 


A opção 2 é bivalente: permite 
introduzir uma lista a partir da cas- 
sette com listagem posterior dos 
nomes, ou então listá-los a partir 
da RAM quando a lista já está pre 
sente, 


ATENÇÃO: A opção 1 ea opção 
2 via cassete apagam qualquer fi- 
cheiro presente em memória (bem 
como o comando 'RUN'. 

Notará que, depois de ter intro 
duzido os dados relativos a um no 
me, aparece um par de aspas va- 
zias (espera de introdução alfanu- 
mérica). Se desejar prosseguir 
com a introdução de ficheiros res- 
ponda a estas aspas carregando 
somente em 'enter'. Se desejar in 
terromper a introdução de fichei 
ros responda às aspas com a letra 
F e, depois, ENTER. 

Se desejar copiar para a impres- 
sora quaisquer dados ou lista, res- 
ponda à indicação no fim do 
écran (pulse 'ENTER') com 
'SHIFT + BREAK e execute o coman- 
do'COPY'. Depois deste comando 
ter sido executado, introduza GO 
TO 10º para voltar à lista de op- 
ções. 

NUNCA utilize o comando RUN, 
pois apagaria o ficheiro em me 
mória. 
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Connection Port e 
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As aplicações acima referidas são alguns exemplos do que se encontra desenvolvido para o Macintosh. Para mais informações, contacte MICROPOR — 
Sistemas de Informática, SARL — Av. das Túlipas, Lote 11, rlc Dt.º — MIRAFLORES — 1495 LISBOA, Tel. 2105295, 2105296, 2105297, Telex 13248 MICROP P, ou 
qualquer dos Agentes Apple autorizados. 
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Todos os dias, novas aplicações 
estão sendo desenvolvidas 
para o computador pessoal 

Macintosh”. 


Aplicações de tratamento de 
tento, cálculo electrônico, 
gráficos, controlo de 
projectos, bases de dados, 
comynicações ... 


E também aplicações que 
permitem ao Macintosh 
cumprir tarefas que até agora 
nunca foram possíveis de 
enecutar noutro computador. 


O que significa que o Macintosh 
se está a afirmar como o 
computador pessoal mais 

famoso internacionalmente. 


Qualquer Agente autorizado 
Apple poderá demonstrar-lhe 
facilmente este facto. 


Peça-lhe para ver o 
computador que possui 
aplicações compatíveis com os 
seres humanos. 


A 








O curso de BASIC está a chegar 
ao seu termo e por isso vamos en- 
trar num periodo de recapitula- 
ções que nos parecem importan- 
tes, explicando de forma diferente 
partes fundamentais do nosso cur- 
SO. 

Para abordar a manipulação 
de informações em ficheiro, utili- 
zaremos uma parte da memória 
interna do micro computador. 
Não necessitaremos portanto de 
suporte exterior de memória caso 
do leitor/gravador de disquettes. 
As ideias aqui apresentadas po- 
derão servir no entanto para o ini- 
ciar nalgumas técnicas simples de 
gestão de ficheiros. 

Tomemos imediatamente um 
exemplo concreto: 

Quer-se introduzir em memória 
vários valores numéricos com o 
objectivo de os analisar sob todas 
as formas: soma, número de valo- 
res negativos, positivos, com- 
preendidos entre 2 determinados 
valores... 

Primeira questão: quantos valo- 
res é preciso tratar? Se os contar- 
mos pelos dedos de uma mão, e 
se soubermos à priori quantos há, 
pode-se fazer figurar estes valores 
no programa directamente. As- 
sim: 


10 PRINT 2+5+7+3 


Uma calculadora 
fas, isto 
dá brincar 






Vai calcular e imprimir no dis- 
play a soma dos quatro numeros, 
(sempre os mesmos), e o resultado 
será sempre... 

17 

Se previrmos quatro recipien 
tes”, ou seja quatro casas da me- 
mória, para guardar os quatro va- 
lores, basta dar-lhes um nome: 


p= : Si us 
EEgrigeeesssticacatteso E d nes 
E | 2 e is 


Ô 
a 
R 


, 





f 





| 










140 PRINT V1+V2+V3+V4 


e prevêr a introdução dos valores, 
no decurso da utilização do pro- 
grama: 






"Quotro variaveis 
Simples : O seu con- 
tevdo pode variar 

mas cada uma apenas 
pode induin um 
SS valor a cada 
instante 




















100 INPUT V1 
1140 INPUT V2 
120 INPUT V3 
130 INPUT V4 
140 PRINT V1+V2+V3+V4 














O programa assim obtido inter- 
romper-se-à quatro vezes para 
dar ao utilizador a possibilidade 
de digitar os valores da sua esco- 
lha: 





Progredimos: o mesmo progra- 
ma vai poder tratar qualquer com 
junto de quatro informações nu- 
méricas, para calcular a sua so- 
ma. Se esses números representa- 
rem receitas e despesas, podere- 
mos mesmo pedir um total de re- 
ceitas e um total de despesas: 


100 INPUT V14 
110 INPUT V2 

120 INPUT V3 

130 INPUT V4 

140 PRINT “BALANÇO”, V1+V2+V3+V4 
150 R=0 

160 D=0 

470 IF V 90 THEN R=R+V14 ELSE D=D+V1 
180 IF V2% THEN R=R+V2 ELSE D=D+V2 
190 IF VI THEN R=R+V3 ELSE D=D+V3 
200 IF V4)O THEN R=R+V4 ELSE D=D+V4 
240 PRINT “RECEITAS”, R 

220 PRINT “DESPESAS”, D 


a partir deles 
proprios. 


dm reflexo: 


po-los a sero 
ho iniCio 
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A utilização deste programa, no 
caso duma pessoa gastadora, po- 





de dar: 


RUN 

? 2370 

?-3650 

? 1200 

7-2712 
BALANÇO -2792 
RECEITAS 3570 
DESPESAS -6362 
OK 


Mas para tratar cinco valores 
em lugar dos quatro previstos, se 
rà necessário modificar o progra- 
ma acrescentando uma linha pa- 
ra a introdução do quinto valor, e 
uma linha para decidir se esse va- 
lor faz parte das receitas ou das 


100 S=0 

110 R=0 

120 D=0 

130 FOR N=1 TO 5 

140 INPUT V 

190 S=S+V 

160 IF MO R=R+V ELSE D=D+V 
170 NEXT N 

180 PRINT “BALANÇO”, S 
190 PRINT “RECEITAS”, R 
200 PRINT “DESPESAS”, D 


Mas na linha 30, a introdução 
de cada novo valor apaga o am 
ferior, uma vez que este é guarda- 
do no mesmo lugar. Portanto, não 


constituimos um ficheiro 





despesas, e convêm ainda moadifi- 
car a linha 140 que calcula a so- 
ma global. Nada prático, sobretu- 
do se quisermos prever o trata- 
mento, não de cinco, mas de cem 
valores: seria então preciso um 
programa de 201 linhas! 


caga 
um cvtro 


trata 





RUN 

? 2370 

? -3650 

? 1200 

? -2712 

? 1150 
BALANÇO 
RECEITAS 
DESPESAS 
OK 





Para o conseguir, vamos utilizar 
uma variável indexada 
chamada quadro 
mais do que um ficheiro armaze- 
nado numa zona da memória in 


ainda 
e que não é 


Um outro mêtodo consiste em 
reutilizar a mesma casa de memó- 
ria, a que chamaremos V por 
exemplo. O tratamento toma em 
tão uma forma repetitiva: 


valor expulso 


necessário 


dicrescentamos 
Nm VAL 


(2 


terna do computador 

Em vez de imaginar um nome 
para cada casa destinada a re- 
ceber um valor, o BASIC oferece a 
possibilidade de se associar a um 
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sO nome, um número de casa: 





home do ficheiro 






numeros das 
casas 





reserva resultante da instrução DIM V(5) 






O programa passa então a ser: 


100 DIM V(5) 

140 S=0 

120 R=0 

130 D=0 

140 =FOR N=1 TO 5 
150 INPUT V(N) 

160 S=S+V (N) 

170 IF VINDO THEN R=R+V(N) ELSE D=D + V(N) 
180 NEXT N 

190 PRINT “BALANÇO”, S 
200 PRINT “RECEITAS”, R 
240 PRINT “DESPESAS”, D 





Depois de termos utilizado este 
programa: 


RUN 
? 2370 

? -3650 

? 4200 

? -2712 

? 1150 
BALANÇO -1642 
RECEITAS 4720 
DESPESAS -6362 
OK 





podemos tirar partido duma pri PRINT V(2) 
meira vantagem desta técnica; a 

de poder consultar o ficheiro para a resposta é logo 

verificações: chamemos o conteu- 

do da segunda casa em modo -3650 
imediato graças a: OK 


cont. na pág. 59 
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LOGO 


introdução 


A maioria das linguagens de 
programação foram criadas nu- 
ma época em que o custo das 
memórias era elevado e como 
consequência a sua capacidade 
era limitada. Alêm disso, o acesso 
aos computadores era restrito às 
pessoas do “meio informático”. 
Procurava-se então simplificar a 
linguagem do ponto de vista do 
computador, mesmo que isso tor- 
nasse o trabalho do programador 
mais dificil. Assim, as linguagens 
ditas de alto nivel aproximavam- 
-se muito da representação fisica 
da máquina. Esta ligação entre o 
“hardware” e o “software” está 
bem patente nas estruturas de da- 
dos utilizadas: apenas se previa a 
utilização de variáveis de tama- 
nho bem definido (escalares ou 
matrizes)! 

Na década de 60 quando o 
preço dos computadores come- 
çou a descer e um maior número 
de pessoas os começou a utilizar, 
foi criada a linguagem de progra- 
mação BASIC. A ideia dos seus in- 
ventores, que é ainda partilhada 
por muitos, é que, como o BASIC 
apenas dispõe de algumas instru- 
ções de base, é fácil de aprender. 

Com a enorme difusão dos mi- 
crocomputadores a maioria dos 
quais trabalhando, senão unica- 
mente pelo menos à partida ape- 
nas com BASIC, chegou-se a uma 
situação em que a maior parte 
das pessoas que sabe programar 
um microcomputador ou estã a 
aprendê-lo, o faz em BASIC. 

No entanto se fizermos uma aná- 
lise desta linguagem e a compa- 
rarmos com linguagens posterio- 
res como o Pascal ou o €, encon- 
traremos nela um grande número 
de deficiências: não há procedi- 
mentos, nem verdadeiras funções, 
não há passagem de argumentos, 
não há variáveis locais, não é per 
mitida a recursividade, não exis 
tem estruturas de dados dinâmi- 
cas, estruturas de controlo, etc. 

Para ultrapassar estas limita- 
ções, quando se pretende fazer 


Mire 


um programa um pouco mais 
complicado, cai-se inevitavel- 
mente na chamada “técnica de 
programação em esparguete”, já 
abordada na introdução ao curso 
de Pascal. (Ver Rev. n.6) 

Os leitores mais atentos lembrar- 
-se-do concerteza de que à única 
“desvantagem” inerente à utiliza 
ção duma linguagem como o 
Pascal é a necessidade dum siste- 
ma de discos em grande parte 
dos casos, para a fácil edição, 
compilação, lincagem e execu- 
ção dos programas. 


A origem do LOGO 


A linguagem LOGO foi concebi- 
da em torno de ideias radical 
mente opostas às que deram ofi- 
gem ao BASIC mas, tratando-se 
duma linguagem interpretada e 
não compilada, permite uma fácil 
edição e execução dos progra- 
mas, facilidade essa que, como 
veremos, é uma das facetas pre- 
sentes em todos os aspectos da 
linguagem. 

A sua grande potencialidade e 
facilidade de emprego, reflec- 
tem-se na memória ocupada por 
um lbom editor/interpretador de 
LOGO que é invariavelmente su- 
perior ao ocupado pelo BASIC. Es- 
te aspecto é actualmente irrele- 
vante, devido à diminuição do 
preço das memórias e conse 
quente aumento da sua capaci- 
dade, o que permite a qualquer 
dos actuais microcomputadores 
correr o LOGO. 

Sobre a direcção de Seymour 
Papert e em colaboração com o 
laboratório de inteligência artifi- 
cial do M.l.T. (Massachussets Insti- 
tute of Technology), uma equipa 
de pesquisa estudou o problema 
do ensino da informática a pes- 
soas de todas as idades. 

Para isso, desenvolveram uma 
linguagem de programação à 
qual chamaram LOGO. Esta é es 
sencialmente um dialecto do Lisp, 
uma linguagem muito potente ufi- 
lizada nas pesquisas no campo 
da inteligência artificial 


e pa 
exclusivo E 
CARLOS AMARAL 


A linguagem LOGO foi pensada 
como a primeira linguagem de 
programação a ensinar aos inte- 
ressados. Está provado que a pri 
meira linguagem que se aprende 
influencia inevitavelmente o modo 
como se programa, e o modo co- 
mo se estrutura o desenvolvimento 
de novos programas, enquanto se 
programar. Os defensores do LO- 
GO afirmam que as bases forneci- 
das pelo estudo inicial desta lin- 
guagem são muito mais apropria- 
das a um futuro brilhante na pro- 
gramação do que as produzidas 
pelo BASIC. 

Papert trabalhou durante muitos 
anos com Jean Piaget, o especia- 
lista da psicologia cognitiva. Este 
observou que as crianças conse- 
guem aprender coisas bastantes 
complexas — como o falar ou o 
caminhar — sem um treino formal. 
O facto desta informalidade estar 
ausente do ensino tradicional, le- 
vou Papert a criar uma linguagem 
que remediasse esta deficiência. 
Como ele próprio escreveu no seu 
livro “Mindistorms”: 

“Actualmente, num grande nú- 
mero de escolas, a expressão “en- 
sino assistido por computador” 
significa que o computador está 
programado para ensinar a crian- 
ça. Poderia dizer-se que o compu- 
tador serve para programar a crian- 
ça. Na minha visão das coisas, a 
criança programa o computador 
e, deste modo, adquire o domínio 
dum dos elementos da tecnologia 
mais moderna e de mais amplas 
potencialidades, ao mesmo tempo 
que estabelece um contacto ínti-. 
mo com algumas das noções mais 
profundas da ciência, das matemá- 
ticas e da arte de construir mode- 
los intelectuais”. 


Programação em LOGO 


Programar em LOGO é facil: as 
primitivas, isto é, os procedimen- 
tos que constituem a base da lin 
guagem, são potentes e noções 
reputadamente dificeis como a 
recursividade ou a passagem de 
parâmetros, podem ser, com o LO- 
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GO, abordadas por crianças. Ao 
contrário do BASIC que deixa de 
lado as noções fundamentais da 
programação, o LOGO permite 
aprendê-las em profundidade. 

O LOGO, à semelhança do 
FORTH, pode ser visto sob a forma 
dum dicionário de primitivas, que 
o utilizador enriquece definindo as 
suas próprias palavras, os seus 
próprios procedimentos. E o que 
se chama uma linguagem extensi- 
vel pois os procedimentos do utili- 
zador utilizam-se da mesma forma 
que as primitivas. 

As novas definições são feitas 
utilizando a palavra TO seguida 
do nome do procedimento. Entra- 
-se então no modo de edição e in- 
froduzem-se as instruções que 
constituem o procedimento. A ins- 
trução END significa fim do proce 
dimento e volta a colocar o siste- 
ma em modo de execução. 


A tartaruga 


Para que possamos analisar al- 
guns exemplos de programas em 
LOGO vamos começar por apre- 
sentar aquele que é talvez o as- 
pecto mais conhecido da lingua- 
gem: a tartaruga e os gráficos e a 
geomeíria a ela associados. 


Esta tartaruga é uma invenção 
de Seymour Papert. Disse ele: 

“Porque não dispor de um peque- 
no animal algures no écran, uma 
tartaruga por exemplo, que sabe 
onde se encontra, para que lado é 
que está virada, e que é capaz de 
avançar, de virar e traçar linhas 
quando se desloca?” 

Com este animal é possível de- 
senhar todo o tipo de grafismos 
com facilidade, sem ter de recor- 
rer às tão pouco manipuláveis 
coordenadas cartesianas. 

Um conjunto de primitivas permi- 
te fazer evoluir a tartaruga. As 
principais são: 

FORWARD 

BACK 


para avançar 
para recuar 

para virar à esquerda 
para virar à direita 


Com o auxílio destas primitivas é 
possivel traçar já inúmeros grafis- 
mos. 

Vejamos por exemplo, como po- 
demos definir um procedimento 
que desenhe um quadrado de la- 
do 100: 


TO QUADRADO 
REPEAT 4 [FORWARD 100 RIGHT 
| 


isto é, repetir 4 vezes o seguinte: 
avançar 100 unidades em frente e 
virar 90º, ou seja fazer um ângulo 
recto. Para o executar basta es- 
crever QUADRADO, 

Se pretendermos que o mesmo 
procedimento possa ser utilizado 
para desenhar quadrados de 
qualquer dimensão, podemos in- 
Cluir após o nome do procedimen- 
to, nomes de variáveis que serão 
atribuídas quando este fôr invoca- 
do: 


TO QUADRADO: LADO 
REPEAT 4 [FORWARD: LADO RIGHT 
90] 

END 


Agora quando pretendermos 
desenhar um quadrado escreve- 
mos QUADRADO 100, ou QUADRA- 
DO 27, etc. 

Existem ainda outras primitivas 
como, PENUP, PENDOWN, PENE- 
RASE, PENREVERSE, FENCE, HEA- 
DING, POSITION, WINDOW, 
WRAP, SETPOSITION, SETHEA- 
DING, XCOORDINATE E YCOOR- 
DINATE, que permitem um contro- 
lo total da tartaruga e a criação 
de qualquer tipo de desenho. 


O Logo e o ensino 


O LOGO coloca assim à nossa 
disposição um ““micro-mundo” 
geométrico, sobre o qual a crian- 
ça pode intervir, bem como uma 





linguagem de comunicação que 
lhe permite verbalizar e pôr em 
evidência os seus próprios mode- 
los de pensamento. Do seu con 
froonto com o “micro-mundo”, a 
criança vai desenvolver as suas 
estratégias de pensamento, pelos 
problemas que encontra e é leva- 
da a resolver. 

O LOGO é pois uma tentativa de 
renovação da educação, definin- 
do novos papeis para o ensino e o 
aluno. Nesta perspectiva, o aluno 
busca experiências e o pedago- 
go, em vez de lhe transmitir um sa- 
Der, vai procurar facilitar-lhe a sua 
descoberta propondo à criança 
“micro-universos” relacionados 
com esse saber. 

Este mêtodo de aprendizagem 
não estã de forma alguma limita- 
do às crianças. Existem domínios 
muito alostractos que podem ser 
modelados desta forma e propos- 
tos a estudantes de todas as ida- 
des. Como exemplo, refira-se que 
dois professores do M.l.T. conce- 
beram um “micro-mundo” regido 
pelas leis da mecânica relativista, 
para ensinar física teórica a estu- 
dantes universitários. 


O LOGO e a inteligência artifi- 
cial 


Aliãs uma ideia bastante vulga- 
rizada é de que o LOGO é uma lin- 
guagem para crianças que ape- 
nas serve para fazer bonecos" 
Não há dúvida de que o LOGO 
tem sido amplamente utilizado 
nas escolas com crianças em pro- 
jectos experimentais, os quais têm 
dado resultados altamente satisfa- 
tórios. No entanto, o LOGO não é 
so a tartaruga e a sua geometria, 

Alêm de todas as operações 
aritméticas e lógicas e funções 
matemáticas usuais, o controlo de 
execução, a comunicação com o 
exterior e com o sistema operati- 
vo, existentes em qualquer lingua- 
gem, o LOGO herdou do Lisp ca- 
racterísticas que lhe conferem 
enormes potencialidades no cam- 
po da inteligência artificial. 

Assim, ao contrário das lingua- 
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gens tradicionais, a estrutura de 
base não é a tabela (ou matriz) 
mas sim a lista. 

Uma lista é uma sequência or 
denada de objectos entre paren- 
tesis rectos: 

(1 27 CARRO 9) 

0) (lista vazia) 

((CARRO RODA) (BARCO LEME)) 

Os elementos duma lista podem 
ser palavras, numéricas ou não, 
ou mesmo outras listas. Em rela- 
ção às matrizes, as listas têm uma 
grande vantagem: têm um forma- 
to totalmente variável. 

A forma como são tratadas as 
variáveis no LOGO é também 
bastante original. Uma variável 
pode corresponder a um nome, 
um número ou uma lista sem ne- 
cessidade de declaração prévia 
ou adição dum caracter especial 
ao nome da variável. 

Alêm disso é permitida a refe- 
rência indirecta como em As- 
sembly, pois uma variável pode 
conter o nome duma segunda va- 
riável à qual se pode aceder a 
partir da primeira. 

Como linguagem de manipula- 
ção simbólica, o LOGO está dota- 
do de numerosas primitivas de tra- 
tamento de listas. Estas primitivas 
podem dividir-se em 3 categorias: 
extracção de informação duma 
lista, construção de novas listas e 
testes lógicos. As mais importantes 
são: 

FIRST, que extrai o primeiro ele- 
mento duma lista não vazia. 

BUTFIRST, que é a operação 
complementar a FIRST pois dá to- 
dos os elementos duma lista, ex- 
cepto o primeiro. 

FPUT, permite inserir um objecto 
no princípio duma lista. 

EQUALP, permite saber se duas 
listas são iguais (também pode es- 
crever-se " =”), 

LISTP, indica se um objecto é 
uma lista. 

NUMBERP, indica se um objecto 
é um número. 

EMPTYP, indica se um objecto é 
uma lista vazia. 

Existem muitas outras primitivas 
“para manipulação de listas, mas 





ME 


estas permitem programar, todas 
as outras. Vejamos um exemplo: 


LAST, que extrai o último ele- 
mento duma lista não vazia (:L): 


TO LAST: L 
IF EMPTYP BUTFIRST: L 


(OUTPUT FIRST: L) 
OUTPUT LAST BUTFIRST: L 
END 


O que significa que o último ele- 
mento duma lista: é ou o primeiro 
elemento se esta apenas contem 
um, ou o último elemento da lista 
que fica quando se retira o primei- 
ro elemento. (O comando OUTPUT 
indica o valor a retornar pelo pro- 
cedimento). 

Uma particularidade que é a 
chave de um grande número de 
programas de inteligência artifi- 
cial e que êé quase exclusiva do 
LOGO e do Lisp é a de se pode- 
rem, de uma certa forma, auto-p- 
rogramar. Com efeito, os procedi- 
mentos em LOGO são representa- 
dos sob a forma de listas e podem 
ser manipulados como dados. 

Assim, por manipulação de lis- 
tas, são criados procedimentos, 
que podem em seguida ser exe- 
cutados com o auxílio do coman- 
do RUN. É pois possivel a um pro 
grama criar procedimentos e exe 
cutá-los. 

Graças a esta característica, 
podem ser criadas estruturas de 
controlo adaptadas às necessida- 
des. Vejamos por exemplo, como 
poderiamos definir as estruturas 
REPEAT e WHILE, aplicadas à lista 
de instruções contida em :L: 


TO REPEAT:N:L 
IF :N=0 (STOP) 
RUN :L 

REPEAT :N-1 :L 
END 


TO WHILE :COND :L 

IF NOT RUN :COND (STOP) 
RUN :L 

WHILE :COND :L 

END 


Todas as possibilidades são per 
mitidas; apenas ê necessário um 
pouco de imaginação. O LOGO é 
mesmo visto por alguns como uma 
espécie de 'micro-mundo” dos in- 
formáticos! 


A representação de conheci 
mentos 


Uma das tarefas sobre as quais 
se debruça a inteligência artificial 
é a análise de fenômenos ou situa- 
ções do nosso mundo. Trata-se en 
tão de representar as relações 
qualitativas existentes entre pes 
soas, objectos e outras entidades 
do nosso universo quotidiano. 

Um método simples de represen- 
tar estes objectos e as suas rela 
ções, é atravês da utilização de 
listas de propriedades ( property 
list” ou “P-list”) associadas às pala 
vras do LOGO. 

A semelhança do que acontece 
no PROLOG, estas listas de pro 
priedades permitem associar a 
uma palavra, uma qualidade e o 
seu valor. 

Por exemplo, se quisermos dizer 
que o Luís é amigo do Paulo e do 
Zê, basta colocar a lista (Paulo Zé) 
na lista de propriedades do Luís, 
sob o título “AMIGO”. Em LOGO, 
teremos: 

PPROP “Luis” AMIGO 

(Paulo Zé) 

Para reler esta propriedade po 
demos fazer 

GPROP “Luis” AMIGO 

que produzirá 

(Paulo Zé) 

É ainda possível criar procedi 
mentos que definem que uma da 
da relação é simétrica; isto ê seo 
Luís é amigo do Paulo, concerteza 
o Paulo é amigo do Luís; ou inver- 
sa, isto é, se o Zé possui um carro, 
o carro é do Zé (ou possuído pelo 
Zé), etc. Podem ainda introduzir-se 
as relações transitivas, com pre 
caução pois a sua programação 
conduz frequentemente a “ciclos 
infinitos”. 

Depois de introduzidos todos os 
objectos e respectivas relações, 


podem ser criados procedimentos 
cont. na pág. 58 
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O público acorreu em elevado 
número durante os quatro dias da 
1 ENIO. 
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Nem sempre o número ê o mais 


importante, dal que nalguns 
stands se lamentasse o facto de 
não ter sido reservado um dos dias 
só para profssionais. Era no entan- 
to de optimismo o sentimento ge 
ral dos expositores quanto aos di- 
videndos a tirar da Feira, e da par 
te dos visitantes também cremos 
que não foram goradas as expec- 
tativas. 

Sabemos como o público em 
geral, aprecia estas ocasiões de 
“convívio” com equipamentos a 
que de outro modo dificilmente 
tem acesso, com o aliciante extra 
das novidades que se possam em- 
contrar ou quando muito que se 
possam ouvir anunciar para bre 
ve, 

Actualização é o termo que me 
lhor exprime o que o visitante es 
pera destas realizações, por isso 
pensamos que quem esteve na 
ENIC não se sentiu defraudado 

Num excelente espaço, uma or 
ganização atenta, e a plena ade 
são dos expositores (houve que re 


jeitar a participação de empre- 
sas, por falta de espaço) e do púu- 
blico, assim decorreu a 1º Exposi- 
ção Nacional de Informática, Co- 
municação, Burótica e Microfilme. 

Paralelamente à exposição de- 
correram nos auditórios do Forum 
palestras dedicadas à informáti- 
ca e sessões cinematográficas 
acerca da produção de imagens 
a 3 dimensões por computador. 

Estas sessões cinematográficas 
foram promovidas pela APl e per 
mitiram ficar a conhecer o que de 
melhor se faz nesta área em todo 
o mundo. Imagens de extrema 
perfeição! 

De parabêns está a API por nos 
proporcionar tão bons momentos 
“informáticos. 


A Visita 

É agradável reparar que às ve 
zes, Portugal não está tão longe 
do resto do mundo como se diz 
por ai. Foi uma surpresa encontrar 
o ATARI 520ST na ENIC, cujo lan- 
camento só estã previsto para 
principios de 86. 

Para os mais curiosos, o ATARI 
52087 é um modelo baseado no 
microprocessador 68000 da MO- 
TOROLA e a sua configuração bá- 
sica é: 198 Kk ROM + 512 K RAM + 
360 K em disquete formatada de 
3,5", No entanto o modelo de prê- 





certame 


“lançamento que estava na ENIC 
tinha 16 K ROM + 512 K RAM, 250 K 
dos quais ocupados pelo sistema 
operativo, o que nos deixa ape 
nas(!)” cerca de 250 KBYTE para 
trabalhar. 

O sistema operativo é o TOS-TRA- 
MIEL OPERATING SYSTEM. Nele está 
incluído o GEM-GRAPHICS ENVI 
RONMENT MANAGER, sistema de 
exploração gráfica criado pela 
DIGITAL RESEARCH. O GEM foi de 
senvolvimento para o IBM PC e 
compatíveis, posteriormente 
adaptado ao APRICOT (havia 
aliás um APRICOT F1 e funcionar 
com o GEM na ENIC) e agora no 
ATARI 5205T. 

O GEM tem um funcionamento 
parecido com o do Macintosh, 
mas internamente nada tem a ver 
com ele, É um sistema de Software 
puro, tão geral que até pode fun- 
Cionar em máquinas baseadas no 
8086 da INTEL, 

O sistema da Macintosh estã inti- 
mamente relacionado com o seu 
Hardware sendo-lhe portanto, to- 
talmente particular. 

O Software agora disponível li- 
mita-se a compiladores, mas já es- 
tão na forja muitos programas 
que, a estarem prontos na data 
de lançamento, tornarão o ATARI 
5205ST um verdadeiro competidor. 













A SPERRY apresentou o seu novo 
PG IT, um microcomputador que 
corre o sistema operativo XENIX e 
portanto com possibilidade de li 
gar vários terminais. 

Tinha também em exposição um 
sistema da série Sperry 5000, ba- 
seado no sistema operativo UNIX. 
Finalmente, ao sistema de escritô- 
rio SPERRYLINK, vem agora juntar- 
-se um leitor de documentos, que 
regista automáticamente docu- 
mentos escritos à máquina, elimi- 
nando a necessidade de o fazer 
manualmente. 

Dimensões reduzidas e facilida- 
de de utilização são os argumen- 
tos” do Leitor de Documentos 
Sperrylink. 
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Em frente estava o stand da OLk 
VETTI com a nova versão do M24 
denominada M24SP (SP para Spe- 
cial Perfomance). 

Dotado de um microprocessa- 
dor Intel 8086 a 10Mhz e de um ca- 
nal de comunicação interna com 
uma maior capacidade, oferece 


a 


uma velocidade de cálculo mais 


elevada, com tempos de acesso 
extremamente curtos. 

Presentes estiveram tambbêm os 
micros da BULL. 

A Cebit sempre atenciosa, mos- 
trou com orgulho os Micral 90/30 e 
90/50. O primeiro é compativel IBM 
enquanto o 90 vai muito mais lon- 
ge, tendo capacidade inata de 
multiposto. 


certoume & 





balho multiposto atê 4 computa- 
dores: o Micral 90 mais três Micral 
30, Um ponto a salientar é a base 
de dados relacional DIALOGUE, 
facilmente configuravel e muito 
potente. 

A ter em atenção. 

Apenas uma nuvem no horizon- 
te: a continuidade destes produ- 
tos que, apesar de bons, têm pou- 
ca implantação mundial. 

No stand da NPN um produto 
houve que passou despercebido 
e que interessa fazer referência: 
estamo-nos a referir ao HYPERDRE 
VE, um disco rigido para o Macln- 
tosh, representado em Portugal 
pela Interlog 

O disco rigido é montado dentro 
do Macintosh. O seu controlador 
tem acesso directo ao coração 
daquele: o microprocessador 


68000. Como passa por cima de 
qualquer tipo de Interface de co 
municação tem muito mais efi 
ciência, aumentando em 15 vezes 
a velocidade do Macintosh. 





Dr. Hermano Ferreira, da BULL 


A compatibilidade com os pro- 
gramas para o IBM PC em MS/DOS 
é total, tendo sido feitas experiên- 
cias com programas e diskettes 
preparadas na IBM. 

Essa compatibilidade tem ori 
gem num sistema operativo muito 
interessante, utilizado atê agora 
em apenas outros dois computa- 
dores: PROLOGUE. É um sistema 
operativo bastante simples e evo- 
luido e com caracteristicas de tra- 


A NCR PORTUGAL apresentou 
na ENIC novos sistemas informáti 
cos nas linhas de computadores 
pessoais, sistemas UNIX tm, Siste- 
mas Industriais e Caixas Automati- 
zadas (ATM). 

Destaque para os novos compu- 
tadores pessoais que incluem o 
PG 4 |, um 16 bits compative 
PC/XT, o PG6, tor compative 


JO elevadas perto 
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mances e o PG8, o primeiro PC-AT 
compativel anunciado no merca- 
do português. 








/ Met rertume && 


Burroughs 





A nova Caixa Automatica (ATM 
5070) vem reforçar a imagem NCR 


no dominio da fiabilidade dos | — A E 
seus sistemas, apresentando ca- ' à, 
racteristicas únicas na comunica- á 


ção com o cliente (ecran de gráfi- Á 
cos, privacidade, módulo de voz, 
etc.) e permitindo ciclos de rea- f 
bastecimento mais alongados. 


e 


Foi oficialmente anunciado na 
Feira a representação da COM- 
PUTER VISION pela PORTU. Eng. Coucello, da Olivettie o Dr. Raul Junqueiro Luis Oliveira, da “Cérebro”, 

As razões que justificam esta de- 
cisão foram apontadas por um dai 
rector da Computer Vision numa 
pequena declaração: dinamis- 
mo, juventude, profissionalismo. 

Neste momento a Portu possui 3 
programas de CAD-Computer Ai 
ded Desing bastante completos e 
muito profissionais, da Computer 
Vision, claro. Um de projecto de 
circuitos impressos, um de dese- 
nho simples a três dimensões e ou- 
tro de projecto de interiores de ar- 
quitectura, 

A Portu fornece ainda suporte fi- 
sico para os programas, baseado 
no IBM PC especialmente configu- 
rado e equipado de periféricos 
para o efeito. 


) 





Dr. Raul Junqueiro e o Eng. Miguel Prieto, da Burroughs. 


TIMEX 
COMUNICADO 
Têm sido recentemente publicados na Imprensa anúncios de “Campanha de Material da T.C.””, publicitan- 


do a venda dos nossos produtos TC2048, TC2068 e Spectrum TIMEX, a preços que, a serem satisfeitas as 
exigências legais e as necessidades comerciais não podem ser praticados. 

Para esclarecimento do público em geral e dos seus Clientes em particular, a TMX PORTUGAL, LTD in- 
forma que as referidas actuações são desenvolvidas pela TRIUDUS, Lda., empresa à qual foram há muito 


cortados os fornecimentos directos daqueles produtos, por falta de pagamento 


A TMX PORTUGAL LTD iniciou já e vai continuar, as diligências necessárias a pôr cobro e punir tais ac 
tuações, recorrendo nomeadamente às instâncias judiciais competentes. 


O Representante Legal 











A PERFORMANCE 














DA FORMULA 1. 








Quem vê as corridas na Televisão pode 
pensar que o “Personal Computer” que 
trabalha na Fórmula 1 tem apenas que 
calcular os tempos. Porém, não é assim. dé 


Porque a Fórmula 1 é, entre todos os 
clientes, o mais difícil: procura 
sempre novas soluções sem nunca 
se contentar. 

Hoje ao “Personal Computer” 
Olivetti pede-se a determinação do 
ponto de máxima velocidade de 
cada circuito. E a passagem de 
dados, em tempo real, da cronometra- * 
gem para todas as equipas. E compara- 
ções, valorizações, hipóteses sobre 
cada uma das variáveis. E no fim de um 
dia de treinos ou de competição o soma- 
tório de todas as informações para o per- 
feito funcionamento das viaturas. 

Assim, no fundo, por detrás de cada 
bom resultado na Fórmula 1 está um 
pouco do nosso trabalho e em cada “Per- 
sonal Computer” Olivetti está todo o 
aperfeiçoamento requerido pela Fórmula 
1. Quantas vezes o seu escritório se trans- 
forma numa pista de Fórmula 1 e quantas 
vezes no seu trabalho se pedem “perfor- 
mances” de Fórmula 1? Leve consigo um 
“Personal Computer” Olivetti e poderá 
constatar imediatamente como pode tra- 
tar mesmo os problemas mais 
específicos. 

Com uma velocidade de cálculo excep- 
cional. Com uma biblioteca de programas 
praticamente ilimitada, graças à compati- 
bilidade com os “standard”. Com uma 
gama de soluções “hardware” correspon- 













dentes às mais 
diversas necessi- 
dades. 

Com uma resolução gráfica de nível 
superior com uma legibilidade do ecrã 
que não tem comparação. 

Eis porque os “Personal Computer” Oli- 
vetti foram escolhidos pela Fórmula 1 e 
estão a conhecer na Europa e também nos 
mercados mais competitivos, como os 
Estados Unidos, um sucesso que não pára 
de crescer. 

Enfim, um “Personal Computer” Olivetti 
merece mesmo ser experimentado. 

Dirija-se aos Agentes “Dealers” Oli- 
vetti que formam uma das redes de distri- 
buição, consultadoria e assistência 


mais vastas de Portugal: 
especialistas altamente profis- 
sionais, sempre prontos a 
explicar, aconselhar, resolver, 
propôr. 
Ou então envie-nos este “coupon”. 
Receberá mais informações e poderá 
constatar que num “Personal Compu- 
ter” Olivetti está toda a tecnologia 
de quem está habituado às com- 
petições mais duras e sabe for- 
mNecer “performances” de 


se 





Fórmula 1. 
Todos os dias consigo no seu trabalho. 


| Para mais informações enviar à OLIVETT! | > | 
É RE PROP NE PEDI UR | 


po AEE RAE E DR RR 
| LOCANOADO: .sccecrcucs NE CUSTE S SSR | 


E | 


| OLIVETTI — Divisão Personal Computer | 
| Largo S. Sebastião da Pedreira, 32-B — 1000 LISBOA — Tel: 534137 | 








































certame 


A RANK XEROX, sempre eficien- 
te e profissional, nada divulgou so- 
bre os futuros lançamentos que 
grande curiosidade começam já 
a despertar. De concreto apenas 
a intenção de 55% dos lucros em 
86, a nivel mundial, ser decorrente 
do sector de informática o que re 
presenta sem duvida, e se assim 
lhe pudermos chamar, uma au- 
têntica viragem na politica da 
empresa. Vamos estar pois aten- 
tos. 

A TELEMATICA apresentou na 
ENIC um conjunto de programas 
de gestão integrada para as em 
presas. Destinam-se ao RAINBOW 
da Digital e são os seguintes: 

— contabilidade geral 

— gestão de stocks 

— gestão de terceiros 

— gestão de pessoal e salários 
— facturação 


Dr.º Célia Metraço, Dr. Raul Junqueiro e o representante da API, Dr. Pereira da Costa. 





Reportagem fotográfica de: 


Estudios Homem Cardoso No nosso stand 

Foram bastante movimentados aqueles quatro dias da ENIC 

E sem duvida extrememante benéfico o convivio e o contacto pes- 
soal com os nossos leitores, e esta foi mais uma boa ocasião para que 
isso acontecesse. No decorrer da Feira muitos leitores nos visitaram, 
transmitindo-nos simpáticas palavras de apoio e incentivo, apresen- 
tado-nos sugestões, pedindo esclarecimentos 

A perfeita identificação entre a revista e o seu leitor é um objectivo 
sô atingido com o decorrer do tempo, por isso são importantes os 
contactos directos com aqueles que nos lêem 

À enorme procura dos numeros atrasados e as assinaturas que se fi 
zeram, à falta de outros indicadores, era suficiente prova do agrado 
registado pelo nosso trabalh: 


Err especia para os ieirores cio regia: Ac Porto relembramos que 
yamos estar presentes na INFORPOR 8 


Esperamos a sua visita 
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ASSOCIAÇÃO PORTUGUESA DE INFORMÁTICA feiras exposições e congressos, lda. 
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BIÓRITMO 


O bioritmo é uma teoria de ori 
gem americana que afirma que 
cada um de nôs passa por pe- 
todos “altos” e “baixos”, no de- 
curso dos quais se está mais ou 
menos em forma. 

Os percursores desta teoria 
defendem que esses períodos se 
organizam em ciclos regulares 
tendo origem na nascença do 
indivíduo. 

É desta forma possivel, se se 
calcular a evolução desses ci- 
clos até a uma determinada da- 
la, determinar com precisão o 
nivel em que se encontra o indi 
víduo nesse momento. 


Os três ciclos do bioritmo são: 


— Físico (FIS): 23 dias 
— Emocional (EMO): 28 dias 
— Intelectual (INT): 33 dias 


Cada um destes ciclos é repre- 
sentado por uma curva sinusoi 
dal cujo período é igual à dura- 
ção do ciclo e a origem se situa 
no ponto zero (dia do nascimen- 
to). 

O programa proposto permite 
calcular os diversos pontos das 
três sinusoides (ordenadas), o 
numero de dias escolhidos está 
disposto em abcissa. 

Note-se que este programa 
permite ainda o cálculo do dia 
da semana assim como o núme- 
ro de dias compreendido entre 
duas datas determinadas. 

Por outro lado é possivel, sem 
dificuldade, modificar o progra- 
ma para tirar uma listagem na 
impressora, 


Do PRINT "BIORRITMO" 

SO REM PROGRAM 

SARA EFS0N HX go 
REM COPYRTGHT rn 

SOFTWARE 

O PRINT "MENU" 

O) PETI 










“CARREGUE 





DE JJ. 






LOGIN 


“SOFTWARE-HOUSE” 


UMA LOJA NOVA 
COM IDEIAS NOVAS 


— Cursos de programação BASIC E ASSEMBLER 










— SOFTWARE — jogos, programas profissionais, utilitá- 
rios e de ensino, em cassette ou diskette 
Spectrum, TC 2048, TC 2068 e Spec- 
trum + 

Commodore 

QL 

IBM PC 

EPSON 






para : 









e O nosso primeiro exclusivo, um ““*package”” de infor- 
matização de firmas de Seguros 





— Cheque SOFTWARE DE NATAL, a solução para as 
suas prendas 






— Brevemente o lançamento do 2068 CARTRIDGE CLUB 





— Software por encomenda, e uma VASTA GAMA de pro- 
gramas originais para o sistema FDD 









— SOS técnico por telefone — coloque-nos as dúvidas, 
nós apresentamos-lhe a so- 
lução 







— Biblioteca Software 


SOMOS UMA NOVA 
EXPRESSÃO NO 
ATENDIMENTO 
CONTACTE-NOS 


CENTRO COMERCIAL STROMP (Junto ao Estádio de Alvalade) 
LOJA 8 Telef. 7584445 
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programa KÃ 


J. MATON 


SE EA ; e a +15 
fe BRR [— oO PH T MT ” se” pt PA És fa BEE | »iá dm 
LA ctiidaNA DE Uiià DADA DATA" 
RO PRINT "3 PoRG SABER md 
| Tai o e Al e Ee Ga TANDY 
LIMA NUMERO DE DIAS ENTRI DATAS 
DRAGON 32 








TANDY 
DRAGON 32 
















Co PRINT" 4- FIM 


100 INPUT "QUAL. 3 SUA 
ESCOLHA 7"; A2 

110 IF AZº1 OR 4354 THEN 
2RINT “ERROS GOTO-40 

20 PRINT 

130 ON AZ GOTO 150,520,680, 
(BR90 

140 END 

50 CLS 

160 INPUT "INTRODUZA O SEU 
NOME: 3 XE 
go PRINT "INTRODUZA A SUA 


DATA DE NASCIMENTO” 


(180 GOSUE B2Z0 

190 CLS 

Zz00O IF ME=2 THEN X=UW 

210 TF X>2 THENX=W 

É LSD LN 

Wa J=1 

240 PRINT "ENTRE O MES E O 
(ANO QUE QUER O EKEIORRITMO" 


250 GOSUE 840 
260 IF M=i OR M=3 OR M=5 OR 
=7 OR M=8 OR M=10 OR M=12 
THEN N=31 

(270 IF M=4 OR M=6 OR M=9 OR 
M=11 THEN N=30 

“280 IF M=2 THEN N=28+(A/4-INT 
(A/4)) 

(290 IF Mí=2 THEN V=h 

00 IF M>Z2 THEN Y=Z 













SO F=y-X 
(X20 CLS 
540 FRINT 
RIO PRINTO! ses 366 JEI JE JE IE IEEE EI EE 
460 PRINT "x** ETORRITMO sx" 
Z70 PRINTOoO! SSI JE IE JE IE IE IE IE IE IE E! 
25 PRINT 
180 PRINT "REALIZADO PARA": XE 
“390 PRINT | 
“98 PRINT "FARA O MES DE 1": 
(Ms “/“sA 
“96 PRINT 

OO PRINT "Ds TARSO p"rIiBs. 












ABR(IZ)s "EMO"; TARA) PINTOS 
TAE (25); "MEDIA" 
CA1O PRINT 
420 REM CALCULO DO EIORRITMO 
(DO MES | 
4z0 FOR E=0 TO N-1 
40 P=INT(100XSIN(Z245, 416% 
EE) /77) 7/1006 
450  E=INT(1LOO*XSIN(Z*T. 1416% 
SE+F)/28))/100 














480 





470 
480 


490 
EO) 
Sto 
20) 
EI) 
Ea 
SEO) 
60 





















70 
SEO 
IPO 
600 
éiu 


6.30 







6I0 


660 
670 
680 
PU 


700 
FrO 
ERAS, 
7a) 


780 
7 0) 
770 
780 
Pário 


00 
810 
320 
Es 
840 
830 
Bé0 











870 














Su 
890 


(KºF)/55))/100 


(11) 3 E; TAR(18); IF TAR(24 SM O 


DA SEMANA 


620 d 
640 


UM CA) "PES 


FRIMEIRA DATA” 


740 
SEGUNDA DATA” 


ENTRE DUAS DATAS E: 


INT((A-1)/4)-INT((CEXC((A-1)/ 
100)+1)/4) 


INT( (O. 48) +2,. 3) +INT(A/4) INT O 
((3*(A/100)+1) 7/4) 








[=INT(100*STN(2*T. 14164 O 




















M=INT(100*(F+E+1)/3)/100 O 
PRINT E +13 TAR(4) FE TAR 


NEXT E 


GUTO 40 

STORM 

LA 

GOSUE 820 

IF Mé=2 THEN H=W 


IF M>2 THEN H=Z 
REM DETERMINACAO DO DIA 


2 a & E + RE 


D=H+ CINT(1=H/7)*7) 

IE D=7 THEN K$="SABADO" 
THEN E&="DOMINGO" 
THEN E $&="SEGUNDA" 
THEN E$="TERCA" 
THEN E$="QUARTA" 
THEN E$="QUINTA" 
THEN E$="SEXTA" 

“DIAPIJS!/"MI ME 


O 


prond 
mn 
ERRO HP CEM 
RE 
OL situ hm 


PRINT 


GOTO 40 
STOR 
es 

PRINT "INTRODUZA pa 
GOSUEBE B2o 
IF Múé=2 THEN X=W 
IF M:2 THEN X=2Z 
PRINT 

FRINT "INTRODUZA És 

GOSUE aro 
IF Mú=2 THEN Y=W 
IF M>2 THEN Y=Z 
F=ABRS (Y-X) 

FRINT "O NUMERO DE DIAS 
nd 2d 
GOTO 40 
STOF 
REM CALCULO DO FACTOR 
INFUT “DIAs:"IJ 
PNPOT “TES sm 
INFUT "ANO:":A 

W= (36548) +]J+ CEL (M-1))+ 


Oo dO AA o dd ADO MA A ao dO Kd 


Q 


Z= (36548) +)J+ (CS1*(M-1))- 


RE. TURN 


END Õ 
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Novidades Editoriais 





O Feiticeiro 
da Montanha de Fogo 


Editora VERBO 


Conjunto livro e cassette para o ZX Spec- 
trum. 

Um livro original, em que você e os dados 
decidem o desenrolar da acção, uma histó- 
ria diferente em que se joga o seu destino. 
É uma arriscada expedição em busca do te- 
souro do feiticeiro. Pode não sobreviver à 
primeira exploração. Mas com alguma expe- 
rência, habilidade e sorte, verá que após 
cada nova tentativa se encontrará mais pró- 
ximo do seu objectivo. 







Micro- 
Computadores 


HELENA STURRIDGE 
e. 









ha 





Microcomputadores 


Editora VERBO 


Este livro é uma introdução clara ao estudo 
dos microcomputadores, que acentua parti- 
cularmente a forma como trabalham. 
Explica o sistema binário e dá uma ideia so- 
bre os periféricos à disposição dos utiliza- 
dores dos microcomputadores. Alguns dos 
capitulos tratam da pastilha de silício, do 
software e da programação. 





O Computador Pessoal IBM 
e Sistemas Compatíveis 


Editorial PRESENÇA 


Este é um manual destinado a familiarizar o 
utilizador do IBM PC. Os autores (Carlos 
Reis e João Capaz) expõem de forma clara e 
completa tudo o que há de mais relevante a 
indicar sobre o hardware, O software, a es- 
trutura e as funções dos sistemas operati- 
vos, e a programação Basic. 

De realçar que todas as informações técni- 
cas se aplicam igualmente a toda a gama 
de microcomputadores compatíveis com o 
sistema IBM. 


TIM HARTNELL 


no seu 
Spectrum e Spectrum + 





Inteligência Artificial 
no seu Spectrum e Spectrum + 


Editorial PRESENÇA 


Desde os programas que aprendem e ra- 
ciocinam, áqueles que falam consigo, exe- 
cutam ordens e lhe dão bons conselhos, es- 
te livro vai guiá-lo pelo fascinante mundo da 
Inteligência Artificial 

Prepare-se portanto para iniciar esta 
emocionante viagem entre mundo das 
realidades científicas e os horizontes a per 
der de vista da ficção! 





INF | 
NÃ ESCOLA mm: 


Li5 de CdMPIS 





, o 3 ” (E) e , . o o 





— À Informática na Escola — 
Manual de Utilização do 
ZX Spectrum (e tc 2068) 


Editorial PRESENÇA 


Um completissimo manual orientado pa- 
ra diferentes aplicações da informática na 
escola, abrangendo desde aspectos de or- 
ganização até aos de carácter pedagógico. 

Eis aqui uma edição muito rica e muito 
útil, não só pelo conteúdo concreto, mas 
também pelo mérito que tem, de lançar pis- 
tas para a exploração das ilimitadas poten- 
cialidades da informática, ao serviço do en- 
sino e da formação de jovens. 


OS 20 
MELHORES 
PROGRAMAS 


PARA O ZX SPECTRUM 





Os 20 Melhores Programas 
para o ZX Spectrum 


Editora VERBO 


Escrever bons programas é uma arte que se 
pode aprender (os leitores da SOFTWARE 
são disso testemunha), e o propósito desta 
obra é ensiná-lo por meio de exemplos es- 
colhidos 


Os vários programas são fonte de referên-. 
cia de técnicas muito difundidas no mundo 
da informática: alguns deles ilustram por 
exemplo, O uso de registo de comprimento 
fixo Ou de comprimento variável, a sua orde- 
nação, a pesquisa binária; outros apresen- 
tam técnicas especialmente adaptadas ao 
Spectrum, atribuindo-se especial importan 
ia 20 uso adequado aa imagem 
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[e 0. os | 2 nu. e 
MUNDO DAS TELECOMUNICAÇÕES DIGITAIS, 
E ani E | dad 
| A TECNOLOGIA DE PONTK TENN UNN NOME 
a to caacie 
EITTITITTITI! 
Inn  EENHE 
e O grande grupo europeu ALCATEL THOMSON 
| nasceu da convergência dos dois leaders no domínio 
? das telecomunicações — CIT-ALCATEL 
= e THOMSON CSF. 
e A ALCATEL THOMSON concebe, realiza e faz 
funcionar todos os tipos de redes de telecomunicações 
58 públicas ou privadas. e fa 
| e Na comutação telefónica digital, a ALCATEL 
THOMSON é o primeiro construtor mundial: 
38 18 milhões de linhas encomendadas por 45 países, das - RM 
quais 6 milhões já em serviço. 
e A ALCATEL THOMSON está na primeira linha dos 
+ grandes construtores mundiais em transmissões por 
cabos terrestres, fibras ópticas e feixes hertzianos, em 
ligações intercontinentais submarinas e espaciais, em 
redes de distribuição de dados e de videocomunicação. o 
Das redes “Chaves na mão”, à cooperação industrial, 
ALCATEL THOMSON é uma experiência, um potencial 
de investigação e desenvolvimento e um know-how que 
oferece as melhores garantias de um investimento 
duradouro. RE 
com Alcatel Thomson 
O AMANHÃ É HOJE 
| na rede lelefônica portuguesa 
| RUE | ques e 
| ALCATEL THOMSON INTERNACIONAL CGE ALSTHOM AGMEL LDA | 
7 Ee DEX 1000 LISBOA "—— E | 


75725 PARIS CE 


| || Tel: 571.10.10 Tel. 730031 | 
| Telex: ALCIT 250927 F Telex: 12463 CGE ATP (5) 
| DL) LS 
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Un 








organizadores NPN e SOFTWARE 


concorrente Você 


meta Gestão Industrial Optimizada 


pole position Programação 


Grande Prêmio que vos propomos 
pretende ser um desafio à capaci- 
dade, imaginação e criatividade de 
todos os programadores portugue- 
ses, procurando-se obter uma 
aplicação prática. Que tipo de Aplicação? 

O projecto deve ter aplicação concreta no meio 
industrial português. 

Portugal é um país sui-generis quanto ao seu teci- 
do industrial. Soluções óptimas noutros países geral- 
mente não se aplicam à maioria das industrias por- 
ftuguesas. ” 

Assim «GESTÃO OPTIMIZADA INDUSTRIAL» preten- 
de ser soluções de portugueses para Portugal. 

Para só falarmos na razão mais próxima, a entra- 
da de Portugal na comunidade europeia, é urgente 
modernizar a nossa industria. E certo que vão che- 
gar do estrangeiro outros meios, outras soluções, por 
isso este Grande Prêmio pretende ser uma alternati- 
va, que acreditamos vai ser a melhor! 

Vai ser como dissêmos «soluções de portugueses 
para portugueses» o que estamos certos é uma ga- 
rantia. 

Como já foi referido por diversos governantes um 
dos objectivos nacionais é criar e incentivar uma in- 
dustria de software (é impossível fazê-lo a nível de 
hardware), como única forma de acompanhar a 3.º 
Revolução Industrial. 

Mesmo que indirectamente esse é também um 














campo que será beneficiado com esta iniciativa 
NPN/revista SOFTAWRE. De tal forma que todos os 
programas com qualidade para serem comerciali 
zados (e não só os três premiados), o serão com 25% 
de direitos para o autor, o que constitui certamente 
um óptimo incentivo suplementar. 


CONDIÇÕES DE PARTICIPAÇÃO 


Para que todos tenham à partida as mesmas hipó- 
teses, não restringimos a participação a nenhum 
equipamento, a nenhuma linguagem, tão sômente 
se exige que o programa funcione com um máximo 
de 256 K e com um suporte de disco 10 MB, em siste- 
mas operativos UNIX, CPM 86 ou MS/DOS. 


Os programas a apresentar podem ser sô em mo- 
dulos tais como: 

— Operações de produção 

— Seguimento da produção (fempos e materais) 

— Planeamento 

— Aproveitamento de áreas 

— Outros 


Ou de forma integrada, 

Três factores importa tomar em conta em gestão 
industrial optimizada: 

— matéria prima ou componentes do produto fi 
nal 

— tempo e custos de máquina 

— tempo e custos de mão de obra 


NÃO SE PRETENDE programas de gestão de stocks, 
contabilidade ou salários, que por nós são conside- 
rados programas para o sector terciário e portanto 
de serviços, A MENOS QUE estejam englobados de 
forma integrada na gestão industrial. 

Será provavelmente útil para os concorrentes, a 
fim de se inteirarem das necessidades ou do que se 
exige numa gestão industrial, que se informem junto 
de profissionais ligados ao sector. 





Grande Prêmio 





y Os trabalhos apresentados podem ser individuais 
ou de grupo, podem dizer respeito a um ramo da in- 
austria em especial ou limitar-se a funções genefi- 


* cos. Tudo depende de si, estimado leitor! 


NOTA: - 

Uma vez que podem surgir dúvidas sobre a maté- 
ra que cabe num trabalho deste gênero, ou para 
evitar qualquer outro tipo de problemas que o fa- 
çam hesitar e portanto o impeçam de rapidamente 
começar a trabalhar no programa, facultamos-lhe 
a possibilidade de nos enviar para aprovação, um 
resumo ou uma descrição daquilo que se propõe fa- 
zer, evitando assim erros de interpretação sobre 
aquilo que lhe é pedido. 


REGULAMENTO 


Art.º 4 — O Grande Prêmio é aberto a todos e não está ligado a 
nenhuma obrigação de compra. É interdito aos cola- 
boradores da revista SOFTWARE e da firma NPN. 

Art.º 2— O Grande Prêmio tem início a 5 de Julho e a data de 
entrega dos trabalhos termina a 5 de Janeiro. Nenhum 
trabalho que chegue depois desta data será conside- 
rado, sendo a data do carimbo dos correios que con- 
ta. 

An.º 3 — Os resultados serão divulgados no número de Março 
da SOFTWARE. 

An.º 4 — As decisões do Juri não têm recurso. 

Art.º 5 — Os Prêmios não podem ser trocados por dinheiro. 

An.º 6 — Os concorrentes autorizam a eventual publicação dos 
seus trabalhos, desde que devidamente identidicados. 

An.º 7 — Os vencedores autorizam a eventual citação dos seus 
nomes e moradas em qualquer documentação de 
promoção. 

An.º 8 — Os organizadores não serão tidos por responsáveis se, 
por motivos de força maior ou por qualquer outra ra- 
zão independente da sua vontade, o concurso deva 
ser adiado, anulado ou modificado. 

Igualmente não são responsáveis por percas, avarias 
ou demoras verificadas nos serviços dos Correios. 

An.º 9 — À participação no Grande Prêmio Implica ter concor- 

dado com este Regulamento. 


prêmios/prêmios/prêmios/prêmios/prêmios/prêmios/prêmios/ 
1.º PRÊMIO 


Um computador SIRIUS 
no valor de 669.000$00 


2.º PRÊMIO 


Uma impressora EPSON 
no valor de 95.000$00 


3.º PRÊMIO 


Uma viagem a LONDRES 
no valor de 40.000800 


Os três programas premiados e todos os considerados pela NPN 
com possibilidades de serem comercializados, sê-lo-ão, com 
25% de: ROYALTIES sobre as vendas efectuadas. 


prêmios/prêmios/prêmios/prêmios/prêmios/prêmios/prêmios/ 
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LINGUAGEM MÁQUINA 


Esta lição é consagrada ao estu- 
do da configuração da memória 
de um Apple ll. 


|) Configuração da memória 


Esta memória compreende 48 K 
bytes de RAM e 16 K bytes de 
ROM, ou seja 48x1024=49152 
bytes de RAM e 16x1024= 16384 
bytes de ROM. 

O número total de bytes é por 
tanto de 16384+49152=65536 
bytes (64 K bytes). 


0000 





0000 Hexa 
49151 BFFF Hexa 
49152 0000 Hexa 
FFFF Hexa 


A ROM (Read Only Memory) 


A ROM compreende um conjun- 
to de sulo-rotinas “Máquina” que 
constitui o BASIC OPERATING 
SYSTEM. 

Logo que uma instrução “BASIC” 
deva ser executada, o sistema es- 
colhe os sub-programas que se- 
rão postos em acção. 

Vamos estudar nos próximos nú- 
meros, as principais rotinas conti 
das na “ROM”. 

Para poder executar estes sub- 
“programas, são necessárias algu- 
mas posições da memória RAM. 
Vamos então ver quais as zonas 
de RAM utilizadas pelo sistema 
operativo e quais as zonas livres 
para serem utilizadas pelos pro- 
gramadores. 


A RAM 


Divide-se em 192 páginas de 256 
bytes 


Endereços úteis aos programado- 


CRREES qui 

















res: 
Página O (endereços $0000 
a SOOFF) 
Zonas disponíveis : S6 a 89 
918 a S1F 
SCE e SCF 
9D6 e SD7 
SEB qa SEF 
SF9 a SFF 


Os programadores utilizam nor 
malmente estas posições como 
ponteiros de endereços, 


Página 1 (endereço $0100 a SO1FF) 


Zona reservada à pilha (ou stack) 
do processador. 


Esta zona é utilizada nas opera- 
ções de PUSH e “PULL” da pilha 


Página 2 (endereço $0200 a S02FF) 


Zona reservada ao buffer de en 
trada. 


Página 3 (endereço $0300 a S3FF) 


Zona disponível: $0300 a S3FF 

Esta zona pode servir para im- 
plantar pequenos programas infe- 
riores a 208 bytes. 


Páginas 4, 5, 6, 7 (endereço $0400 
a S07FF) 


É a memória de écran com ex- 
cepção de 8 bytes reservados às 
cartas de interface. 


Páginas 8 a 192 (endereço $0800 a 
9 BFFF) 
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J. AUQUIER 























30801 Início 
Texto BASIC (S67,868) 
Fim 
a : Início 
ona das S69,56A 
variáveis simples 
Fim 
Início 
Quadro de (S6B,56C) 
Variáveis Fim 
(S6D. S6E) 
Zona livre Fretop 
(S6F,370) 
“.... Fim 
Zona das cadeias 
de caracteres Início 
29600 Sistema 
Operativo 
SBFFF 





Fretop: fim da zona livre 


As zonas limitadas por pontea- 
dos (ver figura) são de extensão 
variável de acordo com a impor 
tância do seu conteúdo. Por 
exemplo, se no decurso da pro 
gramação, o comprimento do tex- 
to BASIC aumenta, as zonas das 
variáveis e dos quadros deslo 
cam-se na direcção dos endere- 
ços mais altos. 

De igual modo, se, diminuirmos 
O número de variáveis simples pre- 
sentes na zona das variáveis, é a 
zona dos quadros que se desloca 
para baixo, 

Uma simples leitura dos pontel 
ros correspondentes aos limites 
(ver a figura) permite-nos situar es- 
sas zonas. 

À zona das cadeias de caracte- 
res encontra-se no endereço 
39600 se o DOS está implantado e 
em S$BFFF no caso contrário. 

A extensão da zona livre varia 
em função do comprimento das 
cadeias de caracteres. 





co 
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cont. LINGUAGEM MÁQUINA 





Nota: A alta resolução gráfica utili Exercício n.º 1: Solução 
za duas páginas em que a memó- 
ria de êcran cobre os endereços Os códigos das instruções “IN- | Programa “BASIC” a transformar 
de $2000 a $3FFF (página HGR 1) e PUT” e “PRINT” são respectivamen- 
de $4000 a S5FFF (página HGR 2). te 84 (hexa) e BA (hexa). Por exemplo: 
y Se utilizarmos a alta resolução, 
deverá ter-se atenção para que a Enunciado: 10 HOME 
zona “ECRAN” utilizada não seja 20 INPUT A: INPUT B 
» perturbada por um programa Com o auxilio duma sub-rotina  30C=A*B 


muito longo ou pelas cadeias de “Máquina”, substitua todos os “IN- 40 PRINTC 
caracteres. Depois de ter feito fun- PUT" por “PRINT's num programa 


cionar o programa com um “BASIC”: Organigrama 

“RUN”, basta efectuar uma leitura Nota: o texto BASIC está implanta- 

dos ponteiros das zonas. do na zona “RAM” entre $801 eo Programa “Máquina” 
endereço contido no ponteiro 






(969,564). 









0300- A? LDA W3$01 
0302- 8D 0B 03 STA $030B 
0305- A? 08 LDA 4308 
0307- 8D OC 03 STA $030C 
030A- AD 01 08 LDA $0801 
030D- C9 84 CMP W$84 
030F- FO 1D BEQ $032E 
0311- EE 0B 03 INC $030B 
0314- DO 03 BNE $0319 
0316- EE OC 03 INC $030€ 
0319- AE 0B 03 LDX $030B 
031C- E4 69 CPX $69 
031E- FO 03 BEQG $0323 
0320- 4C OA 03 JMP $030A 
0323- AE 0C 03 LDX $030C 
0326- E4 dA CPX $6A 
0328- FO 03 BEQ $032D 
O32A- 4C 0À 03 JMP $030A 
032D- 60 RTS 
032E- AC 0B 03 LDY $030B 
0331- 8C 3D 03 STY $033D 
0334- AC OC 03 LDY $030C 
0337- 8C 3E 03 STY $033E 
033A- A? BA LDA H$BA 
033C- 8D 00 00 STA $0000 
033F- EE 0B 03 INC $030B 
0342- DO 03 BNE $0347 
0344- EE OC 03 INC $030C 
0347- JMP $030A 


























Depois de ter introduzido os dois 
programas em “RAM”, digite em 
modo directo “CALL 768” seguido 
de RETURN”. 

Atravês de um “LIST”, pode cons- 
tatar que todos os “INPUT” passa- 


ram a “PRINT”. 
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CLUBE COMMODORE 


Coordenador: 

Sadik Jamal 

Rua da Restauração 83. 2.º 
4000 Porto 

Telef. 699382; Telex 23156 





Fazemos: 


ME 


CLUBE DE SOFTWARE 
de Reguengos de Monsaraz 


Coordenadores: 

José Gabriel Calisto e 

Maria da Encarnação Carvalho 
Sítio da Cartuxa, n.º 4 — 4.º Andar 
7200 Reguengos de Monsaraz 


CLUBE DE SOFTWARE 
da Região de LISBOA 


Coordenador: 

João Manuel Pereira Salgueiro 
Estrada de Benfica, 518, 3.º-Dt.º 
1500 Lisboa 

Tel. 7142007 


CLUBE DE SOFTWARE 
da Região de COIMBRA 


Coordenador: 

Antônio Luis Alves 

Av. Dr. Veiga Simão, 40 
3530 MANGUALDE 

Tel. 62434 

TLX: 53538 ATT — A.L. ALVES 


CLUBE DE SOFTWARE da Bélgica 

, “«Leosoft 

Ecole Industrielle Leo Collard 
(Mons-Belgique) 

Coordenador: 

Philippe Laurent 

Telef. 00/32/65/335948 (6.º Feiras 

das 16 às 20 h) 

10 Boulevard Kennedy 

7000 Mons Belgique 


CLUBE ZX 
Vila Pouca de Aguilar 


Coordenador: 

Paulo Jorge Santos 

Praça do Comércio — Café Califa 
5450 Vila Pouca de Aguiar 


CLUBE DE SOFTWARE 
da Região de PORTIMAO 


Coordenador: 
José Antônio da Mata P. Raposo 
Rua Herôis da Restauração, n.º 24 
BP 

8500 PORTIMÃO 
Tel. 24173 












Decoração de interiores e exteriores; 
serviços de manutenção; floreiras 


E E pai e 
decorativas; entregas ao domicílio. 






Eis alguns dos nossos clientes: 
Presidência da República, B.P.S.M. 
(todas as dependências de Lisboa), 
Hoteis (Tivoli, Penta, Meridien, etc.), 
Centro de Arte Moderna, Centro 
Comercial das Amoreiras... 


al 
PILL 


Somos: 


HORTO DO CAMPO GRANDE 
(Junto à Alameda da Universidade) 
Telefs: 772383/732195 


e agora no 
Centro Comercial das Amoreiras, loja 
1007 





. 
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FORÇAS UNIVERSAIS 





3 REM YINN-YANG 

LOS CLEAR: GRAPH: GOTO 45 
15:COLOR C 

20:FOR Z=Zl TO ZH STEF 
Dis X=RASIN Z: Y=RXCOS Z 
Sos TF Z=0 OR Z=180 
GLCUSOR (X,Y): GOTO 40 
BESLINE —(X,Y) 

40: NEXT Z:RETURN 


dos GLCURSOR (1100-125): SORGN 
SO R=100: 2ZH=180:GOSUER 15 


SOMME 


Vende-se Máquina de contabili- 
dade marca Hermes mod.º F-3 
Preço 60.000$00 
Telefone 056-24531 


PEDRO MIGUEL FIGUEIREDO 


Desejo trocar ideias sobre lin- 
guagens do computador. Contac- 
tar, por carta, para: 

PEDRO MIGUEL FIGUEIREDO 
R. Dr. Anibal Beleza, 243-1.º-Dt.º 
3/20 OLIVEIRA DE AZEMEIS 


200/R 


A teoria da acupunctura vê 
em todos os fenômenos, o resul 
tado da luta de duas forças 
opostas, (reversíveis uma na ou- 
tra), cada uma delas sendo por 
assim dizer o reflexo simétrico da 
sua contrária. 

Essas forças são o Yinn e o 
Yang. 

O Yinn (em negro) é o negati 
vo: as trevas, o frio, a inércia... 

A natureza do Homem, não é 
mais do que uma das formas 
desta oposição entre o Yinne o 
Yang, e todas as doenças têm a 
sua origem num desiquilibrio en- 


SS ZL=2H: ZH=560: C=3: GOSUR 15 
60: ZH=ZL: ZL=0: R=R/2: GLCURSOR 
(0,R): S0RGN: GOSUE 15 

65: ZL=Z2H: ZH=560: C=0: GLCURSOR 
(0, —2*R) : SORGN: GOSUER 15 

THEN [70 ZL=0:R=R/5:C=3:GOSUR 15 
(O, 10%R) : SORGN: 


f5: GLCURSOR 
C=0:GOSUR 15 
30: GLCURSOR 
TEXT: END 





Amstrad CPC-464 procuro pos- 

suidores ou futuros para troca de 

programas e ideias, possível for- 

mação do Clube Amstrad, con- 

tactar: João Amaral Telef. 
895270 


Utilizador de Commodore 64 pro- 

cura contactos para troca de 

ideias e software. Precisa bom 

programa de ficheiro. Contacta 

José Fernandes, rua do Algarve 
71; 7700 Almodovar. 





(-10%R, 





classificados 





programa pd 





M. ABRASSART 


tre estas duas forças. 

Yinne o Yang são antagônicos 
mas inseparáveis. Assim, toda a 
qualidade exterior evidente não 
é mais que o reforço da sua an- 
tagônica interior; o Yinn vê nas- 
cer no seu seio o jovem Yang, si- 
métricamente o Yinn nasce no 
Yang. 

O acto terapêutico consiste 
então em picar o meridiano, se- 
gundo técnicas particulares, 
afim de obter sobre ele um efei- 
to Yinn, ou um efeito Yang, isto é 
a "dispersá-lo” ou "tonificá-lo”. 














-25KR) a 








Vende-se Sharp MZ 700, a es- 
trear, 50 contos 


Telef. 675295 





Registo Dados 
Operação Minicomputadores 


Aceitam-se tarefas ou prestação 
de serviços. Regime de turnos. 
Contactar: Qt.º Stº Amaro, Imp. 
IX n.º 2- 8.º A — Laranjeiro 








E7// 


4 EM LINHA 


4 em linha: um jogo repousante 
que vai divertir as pessoas dos / 
aos 77 anos. 

O objectivo do jogo é muito sim- 
ples: para ganhar basta alinhar 4 
peões numa grelha com / casas 
de comprimento por 6 de largura. 


+ 


Mia 


Podemos alinhá-los na horizon- 
- tal, vertical ou diagonal. O primei 
ro a consegui-lo é o vencedor. Pa- 
ra mais esclarecimentos consulte 
o seu programa. 


Nota: 


No programa devem-se sulbosti- 
ftuir os números e as letras enqua- 
dradas pelas teclas correspon- 
dentes do quadro que se segue. 





COMMODORE 


TIL 
jp! 


. “SAN dida 





SE do seeds oe o oe 
REM “PROGRAMA ESCRITO POR + 
REM ++ PHILIPPE POURTOIS ++ 
RE Lá LAND ARO dee CAR Dido io sido Dodo Codes nús Dodi sea Do io Sd E So RO Ud o ns 
GOTO 7OZE 
PRINT | HT 


o" | 
Sd LS Ad AE SD Que 


IBca STER 


“4 POKE 


- Ee “e; Q ME RA O, bo O 


D FOR 1=1985 TO 
S. 1EM: POKE G4Z72+l, 7: NEXT 
1.4 F (IR 1= jãas, Eu IA E 
40: POKE À, iGBIPOKE S4XTE+ 


rÊ fo; 
eo) ns 


"EE oo: JDGO 


+ a ce CR || SO TES, 
... ... - “ Ê p! “ FA] Ir É o RA . 4 
A ERRA o Pa RL 
, e Ps o rr ti 
La ' E PN 3 Pl EL E e 
7 a. Rd E c = so a LS E) Ti 
: Cá Rat HT - te E do , = y Es 


ea 
í e Hi LÊ Jtrit 
E = 


Rs EED E ED »o0 


ALINHAR HORITONTOALMENTE, " 


190 PRINT O EISIa CIO 


QERTICALMENTE DU EM DIAGONAL 


nR E 
Lil AR" 


] 
És A 











programa Ed 


P. POURTOIS 


gta 





220 PRINT " EJRIE] DO 
PRIMEIRO QUE CONSEGUIR E O 
VENCEDOR O 
210 PRINT " CARREGUE 
NUMA TECLA“ 
220 GET R$: IF R$="" THEN 227 O 
500 PRINT o" CT [i] ":POKE 
S32D0, 10: POKE SZ281,11:DR=1: O 
TR=0:C0=0 
S10 FOR X=1315 TO 1755 
af: POKE 
1517 Lai ZE TER 
X, EGINEXT X 
Ss22 FOR X=1319 TO 1755 
AD:POKE X, EEINEXT X: O 
lZ=1 TO 1761 STEP 4a: 
BESNEXT X o 
Õ 


STEFO 

X) EEINEXT X:FOR X= 

ui: POKE 
ÕÓ 


DO TUM AS Len TI TITE 
As POKE o X) BEINEXTOo X:FDOR X= 
Loss Il) E/bI STEP AD: PORE J 
Et:NEXT X 

ua Cu add A=15 
Nu Ne A ENC ron | 
EE Ad 3 É ta dat dot” au) Put. X; O 
BE TNENT 


ETA ara webs qem tp sos qamo aião qué us emo atm - suo 


f 


IAM) dEEIO: Ls 1) LEMA PIRE 


X, 119 NEXT x Õ 


o) POR Xeisik TO I=7B Er 
2: POKE X, EZENEXT XI FOR Y=i Z5E0 
TO Jéde STEP cePlno XX, 673 


NEXT X O 
570 FOR Y=187E PO sen ETEr 





SOMME 


cont. 4 EM LINHA 


D2:POKE X, EZINEXT X:FOR X=155E 


TU IlobB STEP Zº:POKE Xi b7: 
NEXT X 
“580 FOR X=1EZE TO 1648 STEP 


Z:PDKE X. E7:NEXT X:FOR X=171E 


UVTO 1728 STEP Z2ZºPOKE Xsb?: 
NEXT X 
590 A=48 
EMO FOR X=iS3E TO 1848 STEP 
<::B=A+1L:POKE X, A:ZPOKE S4272+ 
RA DRNERT X 
ElM A= 


UEz0 FOR X=13553 TO 1603 STEP 
SU: A=A-L:POKE X, A:ZPOKE Sa427E2+ 

OK SENEXT X 

“EZ0 PRINT" (E) ++ 


eee 


“40 PRINT + EE 4 
EM LINHA poa 

(ES PRINT "” Eos Eos DR, ER Rs Re E E 
et PRINTo" a 


1024  STEP 


CEB FOR X=10E3 TO 
S4272+X, 1º 


-1:POKE X, 160: POKE 
NEXT X 


CEza FOR X=1DE4 TO 1984 STEP 
AD: POKE X, LEDIPOKE S4272+X, 1º 
(NEXT X 

ES0 FOR X=1985 TO 2027: PDKE 


X 164: POKE 94272+X, 12:NEXT X 


LIM FOR X=l92% TO IiBE STEP 
“4: PURE X, LEG: POKE SI4Z/2+k: 


J2NEXT X:Z=1 | 
tum PRINT º (JA Ja Ja Já já fá jaja 
ECA CA CACO ES OE COCA CMC Era: 
JOGADOR" Z " 

viB IMPUT O” 



















dolar pa OO a 


TARICACATA (ARA Es 


AS SUAS 
715 PRINT 








720 IF I<i OR J(<i THEN 700 
ES IF DE OR J)7 THEN 70 
7350 B=18E5-SQ+1+]+7- 

74 IF PEER cAaJSB THEN 70 
ÚOr7b IF I=1 THEN 790 

70 IF FLEK cA+S7) <A THEN 
Cy Da 

7ãú DR=DR+1 

ay HE £L=l PH iu "PURE Ho Cla 
CnKE S4272+A, | 

Ao djF Z=2 THEN POKRE p,B7: 

O DRE S4L7L+rA, 7 

o TR=a 
CBlz D0=C0+1 


513 
ey 
e) td 


Du 


1Qfig 
iBis 
1 07 
Chi 
100 
104.0 
(K-2 
10537 
1260 
CUM 
1474 
1087 
110 
1iig 
1:00 
1:10 


Lalá 
1214 
RE eo 
1216 
Lelo 
ao 
E K o 

A 4 
1240 


IF CO=42 THEN 10000 
IF DR)7 THEN 1000 

IF  INTCDR/Z)=DR/2 

LE INTCDR/2) ODR/Z 
GOTO 700 
D=AºC=12E=1 ) 

FOR X=iZE8 TO i17E8 STEP 
IF D=X THEN 1018 q 
NEXT X 
D=D+2 Ó 
GOTO MID 
FOR K=X-iZ TO X STEP ?Z O 
IF PEEK ck)=81 AND PEEK 
»=81 THEN 1100 O 
C=1 

IF PEEK (ck)=87 AND PEEK 

1=87 THEN 1110 
E=1 

IF [C)=4 OR E)=4 THENO 
NEXT K O 
GOTO iz70 
C=C+1:GOTO iDEW 
E=E+i :GOTO iDED Õ 
D=:C=1:E=1 
FOR X=175E TO 17E8 STEPO 
IF D=X THEN iZi18 
NEXT X O 
b=Db+S0 
GOTO 1Z10 
FOR K=X-ZZ0 TO X STEP 24 

IF PEEK cki=81 AND PEEK O 

20)=51 THEN 1300 

L= 

IF PEEK cK)=87 AND PEEKO 
0)=B27 THEN 1310 

E=1 O 

LF C=4 OR E)=4 THEN 
GOTO LARO O 
CaC+1:GOTO iZER o 
E=E+1:GOTO 1260 QU 
b=-Nili=1:7E=) 

FOR X=175E TO 1768 STEP O 
AR Iittchl Lá diô O 
GOTO 14Z0 Õ 

E SA TE E STER EM 


iF PEER (K)=81 AND PEEKO 








programa 


COMMODORE 
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CONTROL 
DATA 





SOLUÇÕES PARA TODOS OS PROBLEMAS DE INFORMÁTICA 


CONTROL DATA PORTUGUESA, SARL 


Av. Eng.º Duarte Pacheco — Empreendimento das Amoreiras 
Torre 2 — 15.º Piso — 1200 Lisboa 

Telefs.: 693700/693747/693806/693723 

Telex: 18479 Lisdat P 











Pd PAD DL PA SAI PA PAS ado PATA PA 7 “ta . 


TEIA Todd PA TAS 


meio 










E77 MISES 


cont. 4 EM LINHA 








IF D=X THEN 2100 
1940 NEXT x 


1350 FOR X=i3EZ TO 1608 STEPO 









ÚN-BO)=81 THEN 1550 
1490 C=1 

a 508 IF PEEK cK)=87 AND PEEK 
(K-B0)=27 THEN 15EQ 

ASSAD E=i 
“500 IF Cá DR E)=4 THEN 
EA 

Sao NEXT K 

13940 GOTO id 

ASS0 C=0+1:GOTO 152D 

15EM E=E+1:GOTO 15720 










1360 IF D=X THEN Ziig 























2000 N=1440:M=1596:GOTO 3000 

L010 N=1442:M=1E7ZE:GOTO ZUDO O 

2020 N=i1444:M=175E:GOTO Z000 

2030 N=1446:M=1758:G0TO 3000 

2040 N=1S526:M=176E0:GOTO Z000 

1600 D=A:C=i:E=i:0=76 050 N=LE062:M=176=2:GDTO ZD000 

da FOR X=13ZE2 TO 1596 STEP 2060 N=1598:M=17E2:G0OTO Z000 

75 2070 N=1518:M=1764:G0TO =Z000 

(1EZ0 IF D=X THEN 2000 :“DED N=14Z8:M=176E:GOTO =Z00D 

LEZ0 NEXT X 2090 N=1440:M=1768:GOTO =Z000 

dE40 FOR X=i3E4 TO 16E7E STEP 2100 N=144::M=1688:G0TO Z000 
2110 N=1444:M=1E0S:GOTO Z000 

3000 D=A:C=i:E=1 

Z005 FOR K=N TO M STEP O 

S01U IF PEEK ck)=81 AND PEEK 

cK-D)=B81 THEN Z080 

2020 C=1 

F0X0 IF PEEK ck)=87 AND PEEK & 

(Kk-D)=87 THEN Z090 

Z040 E=l 

Z050 IF C=4 OR Ej=4 THENÔ 

EPA 

SDED NEXT K O 

2070 IF TR=0 THEN 1790 

=Z075 GOTO SZ0 

Z080 C=0+1:GBOTO ZASD 

=Z090 E=E+i:GOTO FOSD 

EOZO PRINT “ His j 

EDIQ PRINT O" BILS] TT] dú 

JOGADOR" Z "GANHOU" 

EiIDO S=54273 

GE1id FOR L=Q TO FA:PDKE S+L, 

D:NEXT 

Eiz0 POKE S+14,5 

EizZp POKE S+18, 16 

E140 POKE S+3, 1 

Ei5A POKE S+Z4, 143 

BELEM POKE S+E, Z40 

Ei7m POKE S+4, ES 

Giso FR=5389:0=5:P=4 U 

E190 FOR T=i TO Z00 

E19S IF INTCT/20)=T/20 THENO 

0=0+1 

E:00 FOU=FR+PEER Co4z7/)+% 5 A 

EZIO ME=INTCEO/o2s5G): LF= Fo- =HF + — 
















































1650 IF D=X THEN ZD10 
EO NEXT X 
FOR X=13EE TO 175 







LL OO! 













lESO IF D=X THEN 2020 
ALID NEXT X 
1700 FOR X=1ZES TO 1758 STEP 


















7 
4710 IF D=X THEN 2050 

720 NEXT X 
FOR X=1448 TO 1760 STEP 
















740 IF D=X THEN 2040 
750 NEXT X 
FOR X=1528 










TO 17EZ STEP 



















IO IF D=X THEN 2050 

A ro0 NEXT X 

1790 D=A:0=S2:TR=1 

FOR X=lÍS1E TO 17€E2 STEP 


























1810 IF D=X THEN ZDE0 
QD NEXT X 
FOR X=143E 













TO 1764 STEP 








O O OO O O 


IF D=X THEN 2070 
vo NEXT X 
FOR X=135€ TO i7EE STEP 







3 
[E 
Si 






IF D=X THEN 2080 
NEXT X 
FUR X=1356 TO 1768 STEP 






LO Ci + 
555 







QD IF D=X THEN 2090 SE . 
10 NEXT X EZZ0 PORE 3+0,LF:POKE S+1,HF O 
20 FOR X=1ZEQ TO 1E88 STEP EUes JF INTCT/20)=T/20 THEN 





(ça = Ds TR Len ( RE ho) 


Ps O o o tá CO coco ha qo 


PURE 32:20, 8 O 
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COMMODORE 











COMMODORE 








“EZEE POKE SEZet, 11 






















E:=0 NEXT T 
nEzZ40 POKE S+Z4, O 
“"“GEZ45 POKE S3290, 10: POKE SZ28 
7 dd 
“250 GOTO 6250 

7000. PRINT O") T [)":POKE 
Osz290, 1:POKE S3Z81,1 

700: PRINT "[Elalfataçtatatata 
OtJájajáala JIU iu (iv Iv] os) O e+ 





Lodo UM PUOULU Dk PAHULIENUIA 
S udesds aeee 1 


Omoa S=54272:FOR L=S TO S+74: 
POKE L, B:NEXT 

OvBid DIM Hcez, 200), LCZ, 200), 
Cir, 200) 

O70ZA DIM FOCcil) 
Ucla VeCA)=17:VCl)=ESIViS 











1) = 


O 7OSB  Plkk 5+10, 8:POKkE S+rZz: 
128: POKE S+2ã, 244 


gar FOR I=z0 TO ii “READ 
OrQcI):NEXT 

7100 FOR K=D0 TO & 
O?118B I=t 

7120 READ NM 

7Y1%0 IF NM=D THEN 7250 


714% WA=VCk):WE=WB-L: TF NMc<Z 
THEN NhMi=NM:WA=2: WE=D 

CO7TISO  DRA=NM/125:0C0%=(NM-1ZB+ 
DRAJ/1E 


tim NT=NM-128+4DRX—- LEHDOCA 
“70 FR=EFOQCNTO 
180 IF 0Cú=7 THEN 7220 


7190 FOR J=E TO OCX STEP ci: 
FR=FR/Z:NEXT J 

O200 — HFA=FR/Z56:LFA=FR-256+ 
HF % 


TELLO IF DRú=1 
“Pe Tara: 
GUI Zi20 
FOR J=1i TO DRA-1 
Htek, L)=HFEA 
o LekK, LJ)=LFA 
> LC, L3)=WA 


THEN Hék, D)=HF% 
Ctko Io=WAZI=I+1: 


















nTzEt I=1+i 
“7225 NEXT 
7230  HCK; D)=HFXILCK; D=LFA: 


Or ckK, 1)=WE 
724) [=I+1:DBOTO 71ZU 
CY=50 IF I)IM THEN IM=1 


72EM NEXT 
ny EU PRINT“ [dã) T E] '":POKE 


Sa280, 0: POKE SE281,0 
72904 PRINT o" fifaTtátá figlialitao 
10 polis ig lig(S/S] SOFTWARE" 


























































7292 PRINT" EQ Tio Rotio li). 
j 









7=54 PRINT 
O O ED E RA O 


























DB DER. 

















7Hpn PRINT O 
y Jiy TIC 
APRESENTA [DZ] E EB" O 
7410 PRINT "GU DADA Lig 
ID [o[id[s) ER, 
E! Cs 








Pd 


20 PRINT" [ONZODNADlio. 
cv 
ja 
Cas PRINT" 
EO [IG RcE 

EM LINHA TZ) 

es a PRINT " 




































7555 PRINT Maua 
ICã CIÊ) [E] 
E) EIS) 1" 





SEM PRINT 



















CE LOnDIo: (d A Eid do 

TER Na 
E O DRINT “ IENGOOOCOO 
Lo TiDiZÃ! E 0 EI) BO 















7575 PRINT “ HENIano o 
CO Nvnao: O Co Em E 
Emo. 














punto U 






























7395 PRINT o npolianor so 
Ta iv Jicisl? O 
74 PRINT 

SOFTWARE TM" O 
7500 POKE S+5, 0: POKE S+E, 240 
7510 POME 5+12, B5:PDKE S+13 6 
, 1H 
7520 POKE S+19, 10: PDKE S+z0, 









197 O 





a e meme (AA 
Co a mm 


Rivo de Restovroção 83-7 4000 PORTO 


ss TAS ACT 


REPRESENTANTE 


EXCLUSIVO 














Rua Arco do Corvalhão 59-6 Dre 1000 LISBOA 


PRETA a. 


Mie 





cont. 4 EM LINHA 


OC SEO POKE 
544 FOUR 

“SS POKE 
Leci, T)SPOKE 
75E0 
HCl, 1)3:PDOKE 
7570 PODRE 


+ 
| = (4) 





COMMODORE 


G+il,C(cl, T)ºPOKE S+18, CCE, I) 


7580 FOR T=i 
7590 FOR T=i 
S +24, 0 
7ERO 
ANSA 
7E1B DATA 
S144Z 
7EZ0 
E4Si4 
999 DATA Q 
2000 DATA 
Q:7, 329 
SB1B DATA 
(578. 578 
2020 DATA 
S0ZD0 DATA 
226,5 5/0 7 SE. 
2040 DATA 
27%, 5987 
2050 DATA 


DATA 


DATA 


(3060 DATA 327, 329, 567, SE 


sa Li, 1): PORE 
SPL Lto> 1) 
PÚRE S+i;,4H(B, 1): POKE 


KART A 


LEI 1, pe CE)? 


196, 198; 
S£Es SE do 


RS eai: que, 
7 


24, 51 


Lá 


ti 
6 + 7 7 
S+E 3995 
+10 HCZ, 1) 


S+4, LO, 1): POKE 


o 
ad E / 


TÚ 
TO 


SW: NEXT:NEXT 
“VM: NEXT: POKE 


[027 TC 
SE ds 


SE /Eo: 


7 E ul 


a mr 4 
, 458: 3! 


ID, 4AGIIE 


57 74%, ElIZE;, doa 
A ZA 
205 


Em us e. 
tab OS cout 7 Lo. 


3090 DATA 
“10, 211, 04 


9020 DATA 
307 o DATA 
Ato SA 
a040 DATA 
K 94, 
aoso DATA 
e. 4 

9060 DATA 
DATA 


do. 








programa 


SE ki) SEC 1E09;, 5/8» 


DE bo DEE, SET IS 


DATA 2 
J0MB DATA 
DS, 3 
9010 DATA 


SE 7, GEE, GE7?, SEDA, SDE 


LA 


1591, 967, 211, 310, 


3DE, 304, 299, DE 


as 
DA 


Do 2180, DE, 2IS 
1326 


Bs 
ig 


13577, 299, 299» IDE; 


I10M DATA SEX, 546, 1375 


mom Paio 
Lt it 7 Set to) 
= 


“ema! dito mm) 9 Seta Se 


1 Z200 


LEDE, GOL, Ar, LEA, 
1401 PRINT 
sDOTO 


+ 1E0E, 523 LAB 


"ana! dita 
2 
dE 


39:00 DATA Q 
3:00 GUTO 104 


PRINT 


| 
: CHE] empate O 


Rá, 





Q 


correio 





Nota da Redacção 

Por absoluta falta de espaço vimo-nos na 
necessida de sacrificar neste numero a ru- 
brica Correio. 

Com os pedidos de desculpa devidos em 
especial aos leitores que nos escreveram, 
prometemos na medida do possivel reparar 
esta falta na próxima edição. 
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Pedimos aos leitores que desejarem reno- 
var a assinatura, que O façam enquanto es- 
ta esteja em vigor, para facilitar os nossos 
serviços administrativos e também para po- 
derem conservar o mesmo número de assi- 
nante. 

Aproveitamos ainda para informar os 
nossos leitores da região do Porto, que va- 
mos estar presentes com um stand na Infor- 
por 85  ( Exposição de Tecnologias de In- 
formação, de 5 a 8 de Dezembro no Palácio 
de Cristal), onde poderão adquirir qualquer 
número da Software, bem como capas para 
encadernar as revistas (iguais às que ofere- 
cemos com o nosso número de aniversário). 

Esperamos a sua visita! 


Convites 


Alguns dos nossos assinantes (espera- 
mos fazê-lo para todos os da zona do Porto) 
vão receber em casa convites que lhe facul- 


tam a entrada na Inforpor 85. 

Uma pequena atenção que esperamos re- 
petir em futuras ocasiões. Só para assinan- 
tes! 





SOME 


Acordo para Padrão Europeu de 
Computadores 


Thomson, o grupo francês de 
electrônica, juntamente com a 
Olivetti e a Acorn, a companhia 
dos computadores pessoais con- 
trolada pelos italianos, estudam a 
possibilidade de desenvolver um 
computador pessoal com fins do- 
mésticos e educacionais. 

Na base deste possivel acordo 
está a tentativa de criar um pa- 
drão europeu para competir com 
os padrões japoneses e america- 
nos. 





As perspectivas são, alêm da 
comercialização dos produtos 
existentes, fazer-se uma eventual 
produção em conjunto. 

Não é de agora que a Thomson 
procura um sócio europeu, tentou 
antes uma ligação com a Philips, 
no intuito de obter apoio a sua re- 
cente entrada no mercado dos 
computadores pessoais. 


Nixdorf Gold Cup 
Consciente das suas responsabi- 
lidades sociais, como maior em- 
presa nacional na sua área de 
actividade, a RIMA dedica desde 
há vários anos especial atenção à 
promoção do Golf. 

Tendo encontrado total apoio 
por parte do Oporto Golf Club (ter- 
ceiro mais antigo clube de golf da 
Europa Continental), a RIMA reali 





Zzou, em conjunto com a sua repre- 
sentada, a “Nixdorf Gold Cup”. 

De salientar o principal troféu 
em jogo, a “Nixdorf Gold Cup”, 
Unica taça de ouro disputada no 
nosso pais e uma das poucas exis- 
tentes na Europa, o que constituiu 
um dos grandes aliciantes do prin- 
cipal torneio de golfe amador em 
Portugal. 





Logiser 
Nova associada da Profabril 


Numa aposta clara na moderni 
zação e dinamização da indústria 
de software”, a Profalbril acaba 
de adquirir 49% da Logiser, uma 
das primeiras softwarehouses por- 
tuguesas. 








notícias E 


Esta empresa de alta tecnologia 
foi criada por iniciativa de um gru- 
po de professores universitários, vi- 
sando responder de uma forma in- 
tegrada a um conjunto de proble- 
mas e necessidades nos meios 
empresariais na produção de 
“software”. 


SESAIFSERACUES E 
d a 





NOVO PACKAGE PARA 
FARMÁCIAS 


A Olivetti Holanda, em colabo- 
ração com a Euromed, reputada 
Software House holandesa, desen- 
volveu um “package” — APÇCOS 
— para a sua linha de equipa- 
mentos de médio/grande porte, a 
L1-MOS, com o objectivo da infor- 
matização integral da Farmácia 
Oficina holandesa, 

O sucesso desta solução é, hoje, 
bem afirmado quer pelo seu reco- 
nhecimento oficial por parte da 
SIGN, instituição nacional das far- 
mácias holandesas, quer pela sua 
instalação em já cerca de 80 far- 
mácias, em pouco mais de 1 (um) 
ano de existência. 


Commodore AMIGA 


O AMIGA já existe. De aspecto 
clássico, bem PC, o seu interior é 
uma melhoria sulostancial em rela- 
ção ao Macintosh. Em vez de se- 
guir a linha do Atari e adoptar o 
GEM (GRAPHICS ENVIRONMENT 
MANAGER) um programa que 
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notícios ER 





obriga o 68000 a fazer todo o tra 
balho, a Commodore desenvol- 
veu circuitos especializados que o 
libertam: 

— Circuito de acesso à memoria 
e animação gráfica 

— circuito de gestão de ecran 

— circuito integrador estereo 

Como exemplo das incríveis po- 
tencialidades do Amiga, pode 
mos dizer que este é capaz de 
aceder ao êcran com uma veloci- 
dade de 1 milhão de pixels por se- 
gundo, uma definição de 
600x 400 com 32 cores simultá- 
neas escolhidas de 4096 diferen- 
tes. 

É provável que o Amiga seja co 
mercializado já a partir de Janei- 
ro, € por um preço na ordem dos 
400 contos! 

Esteja atento ao número de Ja- 
neiro, onde faremos uma análise 
detalhada do que vai ser prova 
velmente a revelação do início de 
86. 





Novas Publicações 





Queremos dar as Boas Vindas a 
dois novos colegas da informa- 
ção, a revista Sperry e a revista da 
Landry. 

Trimestral e de melhor apresen- 
tação a primeira, mensal e sem 
grandes cuidados do aspecto 
gráfico a segunda, são ambas de 
store gratuita. 








PRINTRONIX 


4160 High Resolutior Printe! 


Plotter 


Printonix 





A Printonix, um dos maiores cons» 
truftores mundiais, vai instalar-se 
em Portugal. 

Jean Marie Pirnay, Director Ge- 
ral para a Europa, esteve recente- 
mente entre nôs para divulgar os 
projectos daquela companhia 
americana, 

Seleccionar dois representantes, 
um que estará  especialmen- 
te vocacionado para os contac- 
tos com África, é uma das priori 
dades. 

Nesta conferência de imprensa 
realizada na Sociedade 2000, fa- 
lou-se ainda das impressoras de 
código de barras, um dos primei- 
ros produtos a serem comerciali- 
zados. 


Control Data 





A Control Data Corporation re- 
cebeu quase em simultâneo três 
novas encomendas de sistemas 
de processamento multiparalelo 
Cyberplus e respectivos Cybers da 
serie 180, num negócio que envol- 
ve cerca de seis milhões de dóla- 
res. 

Os processadores Cyberplus, li- 
gados a computadores Cyber, 


multiplicam significativamente a 
capacidade de processamento 
de cada computador. Atingem-se 
desta forma velocidades de com- 
putação, antes restritas a super- 
computadores, a menor preço. 


.. também na China 


No seguimento de relações co 
merciais que tiveram início em 
1974 com o fornecimento de dois 
computadores Cyber ao Ministério 
do Petróleo, a Control Data Corpo- 
ration acaba de firmar um contra 
to no valor de 30 milhões de dóla- 
res para fornecimento de compu- 
tadores e equipamentos ao mes- 
mo Ministério da República Popu- 
lar da China, 

O material a fornecer inclui cin 
co sistemas Cyber 180 e software 
de apoio para processamento de 
dados sismicos, simulação de re 
servatórios, contrução à superficie 
e gestão de campos petrolíferos. 
incluido na venda estã o progra 
ma de software Geomaster, para 
exploração petrolífera. 


«8 com Novas Instalações em 
Lisboa 





A Control Data Portuguesa, em- 
presa subsidiária da Control Data 
Corporation, devido ao alarga- 
mento dos seus quadros de pes- 
soal e de infraestruturas, bem co- 
mo a fim de permitir um mais fácil 
contacto com os seus clientes e 
fornecedores, centralizou todos os 
seus Departamentos e Serviços em 
novas instalações, sitas na Av.º 
Eng.º Duarte Pacheco, Empreen- 
dimento das Amoreiras. Torre 2 — 
15.º Piso. 


— O Pegrana 4 em Mio posto Spaçirum 
E ma sntriçõs o À e pen rir 














SOWUEE programa (Ã 


PARA ESTAR "A CORRENTE” E RoRaDaT 


«Circuito ressonante RLC para- 
leio... 


Não hã grande diferença teó 

rica, salvo o facto da selectivi- 
dade se inverter em relação ao 
Se não encontrou dificuldades circuito em série, 
na teoria relativa ao circuito res- 
sonante RLC série que apresen- 
támos no último número, não he- 
site em lançar mãos à obra e to- 
me conhecimento agora, do cir- 
cuito ressonante RLC paralelo. 


Com efeito: 


Ndb=N 1+250 ) 













260 IE Qlé="E" THEN 200 
270 TE Qlé="F" THEN 300 
280 GOTO 230 

290 REM CALCULOS DO FRORBLEMA 
300 C=QCe(LO4(-12)) 

310 L=LLEC1LOP(-6)) 

320 FI=5, 14159265 | 
30 FO=(1/(2*8PID)D)*(CCCI/ CCD) 
-((R4Z)/ (1 927))) PO. S) 

540 WO=28F'THFO O 
50 00= (LHWO) /R i 
Z60 E=FO/D0 

S70 RE=STRE CR) 

Z80 LE=STRE CL) R 
390 C&=STRECCCO) U) 
400 Q0F=S5TRECDMO) 

Alo FoB=5IkE(HO/ 1000, 


ZlE=CHRE (4) 
O REM CALCULO DUM LIRLUZTO 
RESSONANTE FARALELO 

O REM AUTOR DORMONT ERIC 
SO REM COPYRIGHT SOFTWARE E UU 
“BUTOR 

SU REM 

BO DIM S(1000) 

O QE="*CALCULO DUM CIRCUITO 
RLCO RESSONANTES" 

BO BABE= "4 JEI JE E JC E E SEE SEE E JE E TE TE 
JE JE JE DEDE JE DE DE JE JE SEE DE 6 6 
So HOME 

100 REM ENTRADA DOS VALOKES 
Rag lo 

4lO VT&AE Z:FRINT Ag 

deo VTÃER SsPRINT ARE 

430 VTOR JS INVERSE:PRINT n 
INTRODUZA (1 VAL DOS 
LOMPONENTES RL," sNORMAL. 

14) vTaR G:thINT a 
REBISTENM. IA EM UM. ..1" 

180 VTAÉR LOsS PRINT ai E 
INDUTANCIOA EM MICLROHENEY cas” 
A é VTAR 12Y7PRINT a 
CAPACIDADE EM FICOFARADE” 

170 REM 

Llão VTAR GB:HTAER 27: INPUT Rs: IF 
Ez=10 THEN 250 

iAS0oO VTÃE LO:HTAE 27: INPUT LL: 
IF t=lo0 THEN tou 

“00 VTAR 1AZ:HTAR 2725 INFUT CC: 
[IH E=1o0 THEN 250 
melo VTAR Las FRINIT “PRE 
MODIFICAR Lies RUBRICA, 

















































































430 WOF=STRE (WO) 
440 ERE="R="+RE+ OHM” b 
450 ELg="L="+LE+ MICROHENKY" 
460 ElE="C="+Ca+" FICOFARAD" 

470 EGOg="0 NA RESSONANCIA=" 
+ LM Ea 
480 EFOg="FREQUENCIA DE 

RESSONANC ILA="+FOg+" KHz" 

490 — ER$="BANDA FASSANTE A 
=Db="+B$+ EH! 

500 EMOE="W Ná RESSONANCIA=" 

+ lc) E 

510 ER=SLEN(ERE) ER=(40-CINT 
(ER)))/3 

S20  EL=LENCELE) FEL=(40-CINT 



















































DO) Ee=LENCECE)skl=(40O-CINT 
ig d dd LE 

eo VTAR LO“ FRINT e SEL rá) EQÓO= [EM CEDÕOE) ss EgO= (4ão- 
NUMERO OU cr: FARA AlLABARo. CINTIELOS)) K 

£S0O VTRE Z0:HTBE alsGET LES a fo EPÓ=LEN(CEFOEF) 1: EFO=(40- 
am | o CINTIEFOS)9/% 

do TF Qlêk="1" THEN iBo au Too EE=LENtCERE) :kEbB=(40-CINT 
Fe IP GULA £ TIMEN AY EB)/))/% 






ess ease 
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f 
fio! O uni 
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cont. PARA ESTAR A CORRENTE” 


UsS70 EWD=LENCEWDS$) : END= (4D- 
CINT(EWD)))/2 
s80 REM ENTRADA DA GAMA DE 
FREQUENCIAS 
99 HOME 
20 VTAB 1:PRINT A$ 



















“EiD VTQAR Z:PRINT AA$ 
“E20 INVERSE 

EZ0 VTAR 4:HTAE ER:PRINT ER$ 
"E4B VTAR G:HTAB EL:PRINT EL$ 
ESQ VTAB S:HTAR EC:PRINT EC$ 
-BED VTAB 1D:HTAB EFO:PRINT 
“EFDS 

E70 VTAB 1Z:HTAR END: PRINT 
“EWOS 

ES0 VTAR 14:HTAR EGO: PRINT 
-ERDS 

E90 VTAB 1E:HTAB EB:PRINT ERES 
“700 NORMAL 


“10 VTAB  17:PRINT “4, 
FREQUENCIA MINIMA: " 

Crz0 VTAB | 19:PRINT “a, 
FREQUENCIA MAXIMA: " 

-“JZ0 VTAR 21:PRINT “3. SALTO DE 
“FREQUENCIA: " 

740  HTAB JEVTAB 222FLASH: 
“PRINT "AS FREQUENCIAS EM Hz 


223 INPUT FI: 
IF K=20 THEN 790 
“760 VTAR 19:HTABR 
“IF K=20 THEN 790 
770 VTAB 2i:HTAB 
IF K=20 THEN 790 
>z:PRINT "PARA 
(1,25) DU <F> PARA 


223 INPUT FX: 


<a INPUT SF: 


ACABAR" 
790 VTAR Z3:HTAB 38:GET qus: 
“K=20 


200 IF Q24="1" THEN 750 
Co10 IF Q2$8="2" THEN 760 
220 IF Q28="Z" THEN 770 
CB30 IF Q2$="F" THEN 260 


24% GOTO 790 

950 REM ESCOLHA DO MODO DE 
CALCULO DE SELECTIVIDADE 

SEM HOME 

Ús70 VTAR Z:PRINT A$ 

980 VTAR Z:PRINT AA$ 

CE9B VTAB 7:PRINT "ESCOLHE UMA 
RESOLUCAO" 

DO VTAR 3:PRINT 
E SOBRETENSAO: " 
910 VTAB 15:HTAB 1B:PRINT “i. 
CEM DECIBEL" 


Tt 


"DO FACTOR 














360 1 
3970 
380 









1200 
1010 
1020 
iD3D 
1040 
1250 
1 BEM 
1070 



























































1280 
1:30 
HOME : 








920 VTAB 18:HTAB iB:PRINT 
RELACAO 1/10" 
3930 VTAB Z2:PRINT 


OU 2" 
940 GET Q3 A 
950 IF QZ=i THEN 990 Ni 


GOTO 940 Q 


SELECTIVIDADE O 
990 HOME 


PRINT A O 


1050 NORMAL 
1090 NEXT F O 
1100 HOME 
1112 REM ESCOLHA DO MODO DE, 
IMPRESSAO 
1120  VTAB 4:HTAB 16:PRINT 
wu “MENU. 1x mu O 
11350 VTQR S:HTOR  16:PRINT 
esssenas O 
1140 VTARB 1M:HTAB 10:PRINT 
“1. NA IMPRESSORA" o 
1150 VTAR 1E:HTAB 1O:PRINT 
“2 NO ECRAN" 
11E0  VTAR 22: INVERSE:PRINT O 
“A SUA ESCOLHA ":NORMAL 
1170 VTAR ZZ2:HTAB ZZ2:GET 04$ O 
1iB0 IF Q4$="1" THEN 1Z16 
1190 IF Q4u$="2" THEN 1210 a 
1200 GOTO 1170 lá 
17210 HOME o 
1220 VTAB 4:HTAB  16:PRINTO 
“+MENU. 2x" 

VTAR S:HTAR 1E:PRINTO 


Ll=40 VTIAR AiB:HTAR iB:PRINT 
“4. LISTA DE VALORES DE 8" 

1:50 VTRB 1iZ:HTAR 1B:PRINT 
"2. REPRESENTACAD DE S EM HOR". 
1ZzE0 VTAR iBE:HTAB 1B:PRINT 
“Se LISTA E MOR” 

1270 VTAB 22: INVERSE:PRINT “A 


SUA ESCOLHA" : NORMAL 










"ESCOLHA 1() 













F 0J=2 THEN 990 








REM CALCULO DA 


FOR F=FI TO FX STEP SF 
W=2P 1+F 
D=(F-FB)/FO 
A=A+1 

O= (Li) /R 
ON Q3 GOSUE 15000, 1DDDD |, 
S(A)=S 

HTAB ZB:VTAB 12: INVERSE: 




















O 





































































VTAER Z2:HTAR 25:GET 09% 
IF 05$="1" THEN PRINT: 
GOTO 1340 , — 
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cont. PARA ESTAR “A CORRENTE” 





APPLE Il 


ME 





IF 056="2" THEN PRINT: 
HOME :GOTO 1340 
1318 IF Q5$="E" THEN PRINT: 
HOME :GOTO 15404 
1:20 GOIU 1:00 
4:30 REM LISTA DOS S 
1Zá? IF Q4$&="1" THEN PRINT 
2265 "PRHEIL! 
12:50 IF 056$="2" THEN 149508 
“LIED IF Q4$="1" THEN GOSUB 
20000 
J3ta FOR-F=F1 TO FX SIkP SH 
1:80 E=E+1 
15330 9=5(E) 
1400 PRINT "F="sF3" S"sEgt="s 
1410 IF A=E THEN 1440 
1420 TF E/S2M=INTCE/20) THEN 
“HTAB 2Z9:VTAB 2Z: INVERSE: PRINT 
4 4 (QUALQUER  TECLA)>>":NORMAL : 
GET DES 
“A4xiú NEXT F 
1440 IF 04$="1" AND Q5g&="1" 
“THEN PRINT ZZ&:" PRHEDS 
“1450 IF 05$="1" THEN 2570 
1460 HOME 
4470 REM RESOLUCAO EM HORZ 
1480 IF Q4$%="1" THEN POKE 
“1913, 2º:PRINT ZZ2&;"PREILS 
1490 IF Q4$6="1" THEN GOSUE 
RR 4174) 74] 74 
1500 HORZ:HCOLOR=T 
A=A-1 
DR=2 
PS=0 
ON OZ COSUÊ J0002, 235000 
ON OZ GOSUB Z5000, 40000 
Hô5=170-CINTCSCPS+1)+ 


EDER LIZ IO LA SIEP 
HPLOT JJ, LI 

NEXT LI 

IF Q3=2 THEN 2260 
FOR RD=1i TO 17 
READ x 

READ Y 

X=JJ+X 

Y=80+Y 

HPLOT X,Y 

NEXT RD 

FOR RD=i TO 4i 
READ X 

READ Y 

X=2+X 

Y=16E5+Y 




















programa EÃ 


HPLOT X,Y 
NEXT RD 

FOR RD=i TO 
READ X 

READ Y 
Y=180+Y 
X=2+X 

HPLOT X,Y 
NEXT RD 

FOR RD=i TO 
READ X 

READ Y 
X=2E0+X 
Y=180+Y 
HPLOT XY 
NEXT RD 

FOR RD=i TO 
READ CO 
NEXT RD 

FOR RD=i TO: 
READ X 

READ Y 
X=2+X 
Y=10+Y 
PDOT RS T 
NEXT RD 

FOR RD=1 TO 
READ X 

READ Y 
X=JJ+X 
Y=2+Y 

MRPLOT XY 
NEXT RD 
RESTORE 
GOTO 2530 
FOR RD=i TO 
READ X 

READ Y 
X=]]J+xX 
Y=50+Y 
HPLOT XY 
NEXT RD 

FOR RD=i TO 
READ X 

READ Y 


X=2+X 


Y=bi+Y 
HPLOT XY 
NEXT RD 

FOR nD=1 TO 
READ «X 

rRERD Y 
X=2+X 

Y=E+Y 


HPLOT XY 








programa Kd 


SOMME 


cont. PARA ESTAR “À CORRENTE” 

























2o(U 














VÍ BBDO S=1+€ C2HB+D) 12) 


REM MENU DE FIM 





CIO 





DA RELACAO 1/10:" 











NEXT RD iDidA X=L0GCS) hd 
L27Q FOR RD=i TO lá 10:00 Z=LOGCid) 
«280 READ X iDEDD Y=Cl/Z)34k 
2290 READ Y 1ID4DO S=104%Y 
“ESDO X=ZES+k iBS5DA RETURIY N 
“SID YV=5+Y 15000 S=UI+CZsDaDo 1 fas A 
2420 HPLOT XY 15100 RETURN 
2350 NEXT RD 20020 PRINT AR E 
2340 FOR RD=i TO Z& 20100 PRINT ARS 
2350 READ X 20200 PRINT:PRINT - 
“ZÃãHEQ READ Y 20300 PRINT "RESISTENCIA DE "O 
LO X=E+k :R:5"0OHMS O E 
-“2ã00 Y=iE5+Y 22400 PRINT Na 
2290 HPLOT XY 20520 PRINT “"INDUTANCIA DE * 
z400 NEXT RD SLLS“MICROHENRI” O 
2410 FOR RD=i TO 48 2Z2EDO PRINT 
mea READ DO 20700 PRINT "CAPACIDADE DE o 
“2440 NEXT RD s“CCS"PICOFARAD” 
2440 FOR RD=i TO 109 208200 PRINI =” 
“2450 READ X 2D90B PRINT “FREQUENCIA DE 
460 READ Y RESSONANCIA DE "5FOE:Cisha” 

QE4 70 K=]J+X 21000 PRINT O 
2460 Y=150+Y 211920 PRINT "BANDA PASSANTE À 
mes 8 HPLDT XY -3Db “"5B4b;"Khz" O 

“2800 NEXT RD 21200 PRINT 
2510 RESTORE 21200 PRINT “FACTOR DE 

Ces2n REM QUALIDADE=": CU O 
24 PRINT CHRÉCIZ) 21400 PRINT 

0:40 IF Dág="1" THEN PRINT 21500 IF Qã=: THEN PRINTO 
ZZ&"PRKD":POKE idig vas "VALORES DE 'S' EM Db:":GOTO 


O GET UWU/$ 21704 O 
2360 TEXT:HOME 71600 PRINT "VALORES DE *S 


Vz580 HOME 21700 PRINT Õ 
2590 HTAE 1Z:PRINT "MENU DE :1500 PRINT "FREQUENCIA 
Cr EM” MINIMA (FIL) DE :"5FI/1200:0) 

ZE00 HTÃE LEIPRINTOCestetoteededoo “Ara | 
Meat O =1300 PRINT 
“2610 HTARB iB:VTAR S:PRINT "ii. “2000 PRINT “FREDUENCT AO 
RETORNO AO INICIO» MAXIMA (FX) DE :"FX/10040: 
(EEZD HTAR iM:VTAR iZ:PRINT “Khz” 
"2. REIMPRESSAO DOS VALORES" 22100 PRINT 
mEB3D HTAR iD:VTAB diE:PRINI PEpEa 44 PRINT "SALTOS DEO 
rd si FREQUENCIA DE (SF5 DE: "5SF 


 ZE40 HTAB 5:VTAR “DB: INVERSES 2500 PRINT:PRINT | 
OPRINT "A SUA ESCOLHACI, 7? DU 22400 HOME O 
“) "NORMAL “2807 RETURN 


zE50 HTAR 3D:VTAR 20:GET nes 2000 FOR PP=i TD 270 STEPO 
26E0 IF Deg&="1" THEN RUN (270/08) 
qe ta IF Q8&='"2" THEN E=0:n=0: 2IMI) PS=PS+1 
GOTO SEU 25100 HT=INTCSCPS)*5) 
 ZeS0 IF G84&="Z" THEN HOME: ENL “SAO Ho=INILSCPS+))49) 
VzE9O GOTO ZESD 25300 HPLOT PP4HT TO PP+(Z7O 
2700 END 


HPLOT PP,i 



































































SOMÍmare 


APPLE ll 








programa Ed 


cont. PARA ESTAR “A CORRENTE” 





IF Sc(PS+1))ScPS) AND 
THEN  SP=ScPS-1):DR=34: 


(25400 
DR=D 
J J=PP 
“2S5S0N NEXT PP 
“FEZDO FOR LI=i TO Z7D STEP Z 
-2EB00 HPLOT LI, 71 
2E900 NEXT LI 
(9000 RETURN 
=Z0000 FOR 
OS 270/83 
Z0050 PS=PS+1 
“BÓLAM HT=190- CINTOS (CPS2)4550 
Cz01S50 H5=190-CINTCSCPS+1)45)) 
=2200 HPLOT PP,HT TO PE+CZ70/ 
(3), HS 
30250 IF ScPS+1))ScPS) AND 
THEN SP=S( PS): DR=34: 










PP=1 TO 2/0 STEP 













30275 HPLOT PP, 189 
CUxz0z00 NEXT 
Z0500 FOR LI=i TO 270 STEP 2 
O30900 HPLOT LI. 175 
ziD00 NEXT LI 
BiDiD FOR Li=i99 TO 1Q 
STEP -S 
Z10z20 HPLOT Q,LI 
Cz1030 HPLOT 2Z,LI 
31040 NEXT LI 
“Z1050 FOR LI=190 TO 10 
-S0 
-F1D6O HPLOT SLI 
“31070 NEXT LI 
41900 SP=190-(5+CINT(CSP)2) 
(2000 FOR LI=15 TO 255 STEP E 
Z2200 HPLOT LJ, SP 
CEZ300 NEXT 
32400 RETURN 
-E50B0 HPLOT 1,0 TO ir iso TO 
“276, 190 | 
Z5100 HPLOT 1,0 TO 4, 4:HPLOT 
O272, 186 TO 276. 190 
ZSEDO RETURN 
400D0 HPLOT 1,0 TO 276,0 
AD1B0 HPLOT 1,70 TO 1,190 
40300 HPLOT 1,190 TO 4, iBE 
“DADO HPLOT 276,0 TO 272,4 
AúS0M RETURN 
S000D REM DATA FO (17) 
S000i DATA 4,53,5, 3, E. So 3 do 5 
So hs So 5, o 745, Es 5, 9,5, 5, o 7» 
E» ã, É,» TT FE Fa To SE va 47 
S00US REM DATA B-ZDb (4i) 
Usd0DE DATA sy Nor às d+ “o Ss 13 Rr 


ião Do 15 do 2 To TD, 4, E, 4, 16, 4 








STEP 











































22 hs ds Do dO, 4 54 5, 9,5, 10, S 31,0 
S, 14,5, 15,5, 20,5, 21,5 

390207 DATA Des da Eds da 26 So na O 
E, E. E. 16. E, 19, 6, 22, 6 25, 6, 3, 
To, 715, 7a 13 7a dy 7 15, 7, 20, 
+, 24, 7, 98, 7,9%, 7, 94, 7 z 
SQUiIm REM DATA FI ciz) 
01 DATA 5 7,7.7.3.6.7.6.3.0 
Do do So So. Do 7,5, 3. 4,453. 5, 3, 6, 5 
SQMis REM DATA FX ciág) + 
SUDIE DATA 3, 7,7.7,9,7, 3%, 6, 8, 
E» ça Os És o a 2 Za ko ds, 3 às ie Éta 
3,95,3,6, 3 

S00Z20 REM DATA I/ID (37) 
50021 DATA 5,5.6,5,7,5.6.6,6,0 
716,8,5.9,6,9,7,9) 4, 11,5. il, 

E» ll, 7; | ds Os dils 1%, 6, 13,7; O) 
13,6, 13,6, 14,6, 195 

SQDZZ2 DATA 93,15, 10, 15, 11, 15, 
E. 16, 9 165 114 16,5. 17,6. 17,7, O 
ab Did RARE: 

S0DZ5 REM DATA Db (zm) O 
SODZE DATA 6, 3,8,53,6, 4,8, 4, 4 
5 a 5: E) E, Bo So 9, 5, 1Z;, 5: Rr E» E » (O 
E, 8, E,» a É, Ás a 7? ” E, a 8, To? q, 
ET me, 

S00Z0 REM DATA CURVA S cigg) 
S0DZ1 DATA 4,55,5,8,53,93, 
12, 3.15, 3, 17,3. 18.53.19. 3522 O 
Do ando ne Udo da Do SO De Se o Sa 

SE 3 43 II E “Us 33 ETA 39 KAP da “9 (O 
%, 49, 3, 44, 3, 45, * e 
SQ0Z2 DATA 3,4,7. 4, 10,4, 12,4 — 
15, 4, 17, 4, 20, 4, 22,4, 25,4,27, O 
do Td TS. du ET, do dS, 6 5, 5 7; 

S 10,5, 12,5, 15,.5,17,5.20,5,.. O 
2d, Ds 2d Do eba Do 27, Oo 28, Do SP, 

Da 35,5, 37,5, 38, 5,43, 5, 44,5, 
45,5 

SQVZ3 DATA 3,6, 7,6, 10,6, 12, E: 
15, 6, 17,6, 18.6, 19,6,22,6,25, O 
E. 27, 6, 32, 6, 35, 6, 37,6. 45, 6, 3, 
T,7,7,10,7,12,7,15,7,17,7,19, O 
o aa To ado fo ta fode Ta Sia Ts 

+ Ds DP A A 

S0DZ4 DATA 4,8,5,8,.8,8,9,8, O 
13,8, 14,8, 17,8, 20, 8, 22, B, 25, 
8,24,8,27,8,28,8,29,8,32,8, O 
SS Do» SO Do S7o o SO, 5, 59, Do 43 


Ss 44, S 4 S 
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cont. LOGO 


que permitam a resposta a 
guntas mais ou mel 

das acerca dos aados 

aos 


Cria-se assim uma verdadeira 
linguagem informática em que os 
elementos da linguagem deixam 
de ser, as palavras ou procedi 
mentos do LOGO para passarem 
a ser os objectos, as relações em 
tre eles e as consultas a este siste 
ma de entidades. O micromun- 
do” deixou de ser a tartaruga, pa- 
ra passar a ser um sistema de entfi- 
dades organizado em torno de re- 
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14 - RÉ ZA EAR E , , 
Aplicações especificas por encomenda 


Versoes tambem para Apple 





“ APPLE é uma marca registada de Apple Computer, 





* CP/M é uma marca registada de Digital Reseai 


“eomteca 


ard - O MUNDO CP/M NO SEU A 


(Wordstar, Multiplan, DBASE, 


P/M Plus - Idem para //c 
Interfaces para impressoras c/ 
80 colunas + 64Kb EF e, 


*rogramadores de EPROM. 
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Av. Combatentes da Grande Guerra, 25 1º 


3530 MANGUALDE Tel. 





(032) 63591 





























buffer até 


Em Portugal.. 


À semelhanca do que tem vind: 
3 ser feito em muitos paises, tam 
bêm em Portugal o LOGO esta a 
ser introduzido no ensino. Assim 
no âmbito do projecto Minerva 
do Gabinete de Estudos e Projec 
tos do Ministério da Educação, O 
LOGO foi introduzido no início do 
corrente ano lecfivo em auas es 
colas primárias e duas escolas 
preparatórias 





3 PROCESSADORES - 68000 (10MHz) 
MBASIC,... - 6809 E 
8035 Keyboard 
kt AMPLA MEMÓRIA -— RAM até 14Mt 


- qe - 
- de | 4 í 
- Mon: 3. 


-— ROM até 512Kb 


- 4 slots de expansão 
calendario e sin 
- 16 portos programaveis 1/( 
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Alguns preços : 
128Kb+2x800Kb - 564.5008$00 
512Kb+800Kb+10Mb - 958.000$00 


Aceitamos propostas para revenda, 


tetizador de voz 





O 


SOME 


cont. BASIC 





Uma outra vantagem, é que pas 
sa a ser possivel a distinção das 
tarefas: 


, 100 DIM V(5) 
140 REM ENTRADA DE DADOS 
120 FOR N=1 TOS 
130 INPUT VÍN) 
140 NEXT N 
150 REM PROCESSAMENTO PASCAL 


om = No último número, por lapso fal- 
180 D=0 taram umas linhas no fim do se- 
190 FOR N=1TO 5 gundo parágrafo. O seu conteudo 
200 S=S+ V(N) era: “Em Pascal a sequência é 

r conseguida atravês de uma lista 
Ai IF V(ND JO THEN R=R+ V(N) ELSE D= D+ V(N) de amo dm encaixadas entre 

NEXT N - 
um BEGIN, : | 

230 REM RESULTADOS - cora no início, e um END, no 
240 PRINT “BALANÇO”, S 
250 PRINT “RECEITAS”, R 
260 PRINT “DESPESAS”, D 
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systems 


2200 


e Compatível IBM-AT/XT (Software/Hardware) 
e Multiuser/Computador pessoal 

e Rede local de computadores 

e Alta resolução grafica 

e CPU-80286 


e Sistemas operativos 
Xenix 286 
MS-DOS 3.1 

e Memoria 
HAM desde 

ou al 44 
HOPI 
ME 


Distribuidor para 0 5 ha : » hd 
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SO/MWENE programa (À 


COMO LIGAR 2 PROGRAMAS P. COUPATEZ 


O autor propõe-nos um artigo Agora digite LIST e vai ver que 1.º PROGRAMA 
muito sucinto que permite ligar Os seus 2 programas estão liga 
dois programas entre si a partir dos! 























gon 32. | 
Este procedimento está publi | 

ane 20 PRINT I; 
30 NEXT 1 


cado num livro inglês escrito por 
40 PRINT 





lan SINCLAIR (1983) nas edições 
Granada: “The DRAGON 32 and 
how fo make the most of if 

No entanto essas instruções es- 
tão incorrectas nos endereços 
dos ponteiros 

O sr. Coupatez corrigiu-as e 
quer partilhar esse seu trabalho 
com todos os utilizadores do Dra 
gon 32. 


duma cassete. isto para o Dra | a é 7 ) | | | 10 FOR 1=1 TO 100 


SAVE 


A “ À EN Ne 
% NEN É Ê 
«RE NA 
DST 
Procedimento: | 


1/ RENUM' do 2.º Programa pa- 
ra um endereço superior ao 
do 
1.º programa, 


21 'CLOAD' do 1.º programa. 
ATENÇÃO: não teclar "LIST SAE da AS, o | 
ou "RUN!!! prog | O A 2/2000 mm 

“ Y 7 N 


de A cd 


3! PRINT PEEK (25); PEEK (26) 
ENTER e chama os valores 


" 
N 







z bis E A dis 928 eta 
afixados respectivamente: Tp E E ? a dm ts pero ES A 
aeb | a=30e s Odo OoperaTorio 
p=, Exemplo: 2.º PROGRAMA RESULTADO 
4/ TECLE: 
'J=256*PEEK(27)+PEEK(28)-2 10 FOR I=100 TO à STEP -1 10 FOR 1=1 TO 100 
ENTER“ 20 PRINT IJ: 20 PRINT I: 
'H=INT(J/256) :L=J-256%H 30 NEXT | 30 NEXT 1 
ENTER“ 35 PRINT 
'POKE 25,H:POKE 26,J ENTER RENUM 40 40 FOR 1=100 TO 1 STEP -1 
à à o o 50 PRINT 
5/"CLOAD' o 2.º programa 40 FOR 1=100 TO 1 STEF s( NEXT 
“0 PRINT 
6! 'POKE 25, A: POKE 26, B ENTER SU NEXT 
(sendo A e B os valores d | 
ponto 3/) DAVE 


64 PAGINAS 
SO UNE os DuBAM 
é MESES 


51 
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ESTRUTURA DE DADOS 


Estruturas de dados porque” 

Depois da leve(”!) introdução a 
este assunto no artigo anterior, ul 
ge alguma clarificação. A extem 
são do tema e a falta de informa- 
ção corrente pode ter suscitado 
algumas dúvidas 

Ora nôs criâmos os computado- 
res para nos auxiliarem na resolu- 
ção de certos (muitos) problemas, 
o que se torna possível atravês da 
manipulação pura e simples de 
grandes quantidades de dados. 
Estes dados, embora abstractos, é 
que possibilitam o tratamento 
computorizado dessa mesma im 
formação. 

Primeiro que tudo hã que anali- 
sar o problema e decidir quais os 
objectos que o representam, se- 
leccionando os essenciais e es 
quecendo os pouco importantes. 
A representação dos problemas 
no computador (através dos da- 
dos) significa, antes de mais, uma 
simplificação desses mesmos pro- 
blemas. 

Depois temos de decidir como 
representar a informação. É uma 
decisão aificil(!), sobretudo se 
aquela fôr muito volumosa e esti 
ver inter-relacionada de diversas 
formas. 

1.º passo — escolher uma lin 
guagem 

2.º passo — escolher e definir os 
tipos de dados 

3.º passo — estruturá-los (definir 
estruturas) 

4.º passo — programar 

Se escolhermos a linguagem 
PASCAL, temos à nossa disposi 
ção: 

— CONSTANTE 

— VARIÁVEL 

— EXPRESSÃO 

— FUNÇÃO 


para poder manipular os tipos fun- 
damentais de dados. 


Estes tipos ("TYPE") “caracteri- 
zam essencialmente o conjunto 
de valores a que uma constante 
pertence, ou que podem ser assu- 
midos por uma variável ou expres- 
são, OU ser gerados por uma fun- 





ção ( ) 

Depois é necessária a utilização 
de métodos de estruturação que 
tornem possível e aumentem a efi 
ciência da computação. Muito 
antes do aparecimento dos com 
putadores, por volta de 1/50, já 
Euler dizia: ... se mais uma vez ar- 
regaçar as mangas para compu- 
tar durante três dias e três noites 
seguidas, gastarei antes disso um 
quarto de hora para pensar nos 
mêtodos (de computação) que 
sejam mais apropriados. 

No artigo anterior debrucei-me 
sobre o método de estruturação 
(não confundir com estrutura) mais 
frequentemente utilizado: o Al 
RAY. Prometi tamblbêm introduzir os 
ponteiros (POINTERS). Vamos então 
enquadrar estes mêtodos segun 
do o PASCAL e o seu precursor: 
NIKLAUS WIRTH. 

O PASCAL possui quatro méto- 
dos estácticos de estruturação: 

— ARRAY 

— RECORD 

— SET 

— FILE 

Permite também a criação de 
estruturas dinâmicas como as lis- 
tas ligadas, os anéis, as árvores e 
os grafos, atravês dos ponteiros 
(previstos na linguagem). É claro 
que não posso falar de tudo isto, 
mas para os mais interessados 
aqui fica a referência. Um conse 
lho: dêem uma vista de olhos pela 
bibliografia! 

Com esta pequena introdução 
tenciono mostrar como é simples e 
bela esta ciência. Bom. Deixemo- 
-nos de filosofias e passemos à ac- 
ção. 


PROBLEMINHA 


Temos uma lista de nomes orde- 
nada alfabeticamente e coloca- 
da num array A 


valor 
CARLOS 
FERNANDO 
LUIS 

PAULO 
RAUL 


A: Indice 


NEON = 


ss 





PAULO AMARAL 


Quer inserir-se mais um nome na 
lista: DIONISIO 

Procedimento: 

4 — Procurar o sítio onde encal- 
xa DIONÍSIO. É entre CARLOS e FER- 
NANDO, isto ê, entre os índices 1 e 
2 (de preferência com um algorit 
mo eficiente como a busca biná- 
ria). 

2 — Abrir um espaço para en 
caixar o nome 


A: Indice valor 
4 CARLOS 
2 
3 FERNANDO 
4 LUIS 
o PAULO 
6 RAUL 


Tivemos de chegar os quatro no- 
mes (índice 2 a 5) uma casa para 
a frente (3 a 6). 


3 — Inserir finalmente o nosso 
elemento 
A: Indice valor 
1 CARLOS 
2 DIONÍSIO 
o FERNANDO 
4 LUIS 
e PAULO 
6 RAUL 


Duma forma semelhante para 
apagar este nome da lista temos 
de chegar para trás todos os ele- 
mentos do índice 3 ao 6 para 2 a 
õ. 

A limitação desta estrutura estã 
em que tivemos de mover 4 ele 
mentos para a frente e para trás. 
Se isto não parecer uma limita- 
ção, então pensemos em termos 
reais numa lista com 1000 elemen- 
tos e com 30 caracteres cada um, 
por exemplo. A quantidade mé 
dia de memória a deslocar neste 
caso seria o correspondente a 
500x30 = 15000 carateres... 


A estrutura que vamos estudar 
hoje melhora substancialmente o 
procedimento, tornando-o inde- 
pendente do volume dos elemen- 
tos. Para isso vou introduzir primei- 
ro o conceito de ponteiro. 
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cont. ESTRUTURA DE DADOS 


POINTER 


Esta palavra é um estrangeiris- 
mo. A sua tradução é ponteiro. En- 
tre nós, informáticos, chamamos- 
lhe muitas vezes POINTER, bem à 
inglesa. Passe, portanto, o estran- 
geirismo. 

Tradicionalmente o ponteiro e 
um índice (um número) que traduz 
a localização de um determinado 
elemento (pode ser ate outro pon 
teiro). Ou seja, ao utilizarmos um 
ponteiro podemos aceder indirec- 
tamente aos nossos dados. Con- 
vêm, desde já, deixar claro que 
em PASCAL o conceito de ponteiro 
é ainda mais abstracto e geral, re 
lacionando-se directamente com 
estruturas dinâmicas. Para não 
complicar demasiado as coisas, 
não vou esgotar o assunto e va- 
mos implementar os ponteiros em 
ARRAY's. É que ainda estamos a Ii 
dar com estruturas estáticas. No 
próximo artigo vou dar o primeiro 
cheirinho de estruturas dinâmicas, 
e, aí, clarificarei melhor o proble- 
ma. Adiante. 

No BASIC, que é uma linguagem 
menos evoluida, a Unica maneira 
de implementar estruturas com 
ponteiros é justamente com AR- 
RAY's, e é, em tudo, semelhante às 
linguagens de baixo nível (lingua 
gem máquina e assembly). 

Resumindo: Vamos utilizar um 
array cujos elementos são os indi 
ces de outro array que tem os ele 
mentos principais (nomes) 


Antevisão com uma ordem alfa 
bética inversa 


Índice 









BONS 
>shNroBO 








Como já reparararm graf 


do ponteiro € 
es 


Vamos agora im 
trutura de dad: jo exe 


A: 


terior com este sistema 


** LISTA ORDENADA INDEXADA”* 


O array que tem os ponteiros 
não é mais do que uma tabela de 
indices. Este processo é utilizado 
em muitos sistemas e, por vezes, 
chamam-lhe directórios (os cele 
bres). Vamos adaptar o exemplo 
anterior segundo este processo 

Primeiro, é criada uma lista de 
nomes ordenada duma forma to 
talmente arbitrária, por exemplo 
de acordo com a chegada crono- 
lógica dos dados (situação muito 
comum no dia a dia; & raro che 
garem por ordem alfabetica) 

EX 
A: Indice 


valor 
1 PAULO 
2 FERNANDO 
3 RAUL 
4 CARLOS 
o LUIS 


À medida que o conjunto dos 
nomes é criado (simples lista de- 
sordenada) organizamos a tabela 
de índices que mantêm a ordem 
alfabética. É assim que concreti 
zamos uma LISTA ORDENADA E IN- 
DEXADA. 


B: Índice 











Índice valor 


Á RAUL 

2 PAULO 

3 LUIS 

4 FERNANDO 
o CARLOS 






iai 


DIONISIO 


1.º passo — utilizar uma busca 
para encontrar o ponto de inser 
ção na lista. Para mostrar como se 
utiliza esta estrutura vou exemeplifi 
car essa busca: 


A) O meio da lista é (5+ 1)/2=3 
O 3.º elemento do array Bê 5. O 
5º elemento do array A é LUIS. 
Ora alfabéticamente DIONÍSIO < 
LUIS. Escolhe-se a metade inferior. 

B) Escolhe-se (3+1)/2=2. Da 
mesma maneira o 2.º elemento 
do array B é 2. 

O 2.º elemento do array A é FER 
NANDO. DIONÍSIO <FERNANDO: es- 
colhe-se a metade inferior. 

C) Escolhe-se INT(2+1)/2=1. O 
4.º elemento do array À é CAR 
LOS. Como DIONISIO>CARLOS o 
índice de DIONISIO val ter que ser 
encaixado entre o primeiro e se 
gundo indice do array de pontei- 
ros B. 


Atê agora o trabalho foi prafica- 
mente o mesmo requerido pela 
estrutura anterior, com a diferem 
ça de que a localização dos no- 
mes foi feita indirectamente. A 
vantagem vem a seguir. 


valor 
PAULO 
FERNANDO 
RAUL 
CARLOS 
LUIS 


aISS Para a inserção, em 
vimentarem todos os 
e apenas 0 
suficiente 
iem alfapefica 

a Pas em Dreocupo 
Jo dai 


eqiatamente aIspo 


e mentan 


- jue é 
[ Q Y A, 


E naice € 


ais pele no ai 
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cont. ESTRUTURA DE 


R 492 543 ) 
3 À IHICE 
Pá] P, j Á I| 
123456 ndaice 
462543 valo! 
123456 Índice 


Vem finalmente 


A 
Indice 


valor 


Para se apagar um elemento o 
processo é semelhante 

1.º passo — (opcional) levar o 
dito elemento a O 

2.º passo — apagar o aponta- 
dor 

3.º passo — chegar todos os 
apontadores seguintes uma casa 
para trás 


Nota: Só é preciso ter cuidado em 
memorizar os espaços que vão fl 
cando vagos para não haver o ris- 
co de se ter “lixo” no array A. 

Um bom método será alterar o 2.º 
passo: em vez de se apagar o 
apontador definitivamente, faz-se 
uma transferência para a parte 
superior e vaga do array B. Podem 
ficar assim memorizados todos os 
espaços que vão ficando vagos. 
Depois, quando se for atribuir um 
espaço para um novo elemento, 
verifica-se primeiro se há algum li- 
vre no interior do conjunto da lista 
dos nomes. Existem mais sistemas 
para isto, é claro. Para mim, o me 
lhor deles é o das listas ligadas: 
uma estrutura dinâmica, das mais 
simples, que tenciono explicar no 
próximo artigo. 


Resta-me fazer um pequeno es- 
tudo de eficiência para provar a 
melhoria conseguida por esta es- 





ME 


JA! (o. 


J mos que seria neces 
| 9UUÍ 
ista de 1000 
omes de 30 caracteres cada um 
om a estrutura da lista ordenada 
simples), sempre que quisessemos 
proceder a uma operação funda- 
mental. Com esta estrutura inde- 
xada basta deslocar apenas os 
ponteiros (1000/2 = 500 em média) 


e jeslocar em negia 
gracteres com ata 


valor 


PAULO 
FERNANDO 
RAUL 
CARLOS 
LUIS 
DIONÍSIO 





Aqui cada ponteiro pode ser codi- 
ficado (internamente ou pelo pro- 
gramador) em dois Byte's, portan- 
to deslocar-se-áà apenas 1000 ca- 
racteres. E o processo é indepen- 
dente do tamanho dos elementos 
da lista pincipal... 

Conclusão: se a quantidade de 
dados-for pequena, esta estrutura 
não traz grandes vantagens, mas, 
se, pelo contrário, lidarmos com 
muitos dados, é aconselhável ex- 
perimentar os grandes beneficios 
de velocidade de processamento 
que esta estrutura, ainda simples, 
já traz 


PEQUENO TEMA PARA REFLECTIR 


Atê agora não foi feita qualquer 
referência ao tipo de memória 
que se pode utilizar: viva OU se- 
cundária (atê porque se lidou 
com array's). Ora esta estrutura 
permite que já se possa ter um fi 
cheiro (de acesso aleatório) de 
nomes, em memória secundária 
— só é necessária a presença em 
memória viva do array de ponte 
ros (B). Sugiro ao leitor que reflicta 
sobre a implementação de um tal 
sistema, que mais tarde aborda- 
rei. 


(*) NIKLAUS WIRTH 





curso [9] 


Bibliografia 
Algorithms+ Data Structures 
= Programs, Niklaus Wirth 


introduction to the Design and 
Analisys of Algorithms, Goodman, 
Hedetniemi 

Pascal for Programers, Olivier Le- 
carme, Jean Louis Nebut/Compu- 
ter Data Structures, John Pfaltz 





No NATAL... 
ofereça 
CONHECIMENTO 
ofereça a 
assinatura 

da revista 
SOFTWARE! 










TC 2048/TC 2068 
DOIS COMPUTADORES DISTINTOS 
A MESMA TECNOLOGIA AO SERVIÇO DA MICRO-INFORMÁTICA 








TIMEX COMPUTER 2048 


Compativel SPECTRUM 

Teclado circuito impresso 

Porto para Joystick tipo KEMPSTONE incorporado 

Saida para Monitor Video composto 

interruptor ON/OFF 

LED de sinalização 

Barra de espaços 

Ficha de expansão para periféricos com sinal RG.B 

Dupla resolução gráfica 

Sistema de disco — (pode suportar, controlando até 4 
Drives de 3”, 140 K/face (formata- 
do), com porto RS 232 para comu- 
nicação/série) 

e Armazenamento de intormação 

e Gravador de cassettes 

e Microdrive 

e Sistema de Floppy Disk 




















e CAMPANHA 
DE TROCAS 















e OFERTA LANÇAMENTO (1 JOYSTICK + 6 CASSETTES) 













TIMEX COMPUTER 2068 


Na linha do TC 2048 e compatível com ele, apresenta-se 
mais potente graças à adição de novas funções, sintetiza 
dor de Som e Porto para Cartridges. Este permite-lhe 
carregar instantaneamente programas em ROM, sem ne 
cessidade de recorrer ao tradicional gravador de cassetl- 


tes 













6 Cartridges disponiveis 
e ANDROIDS e CRAZY BUGS e BUDGETER 
e FLIGHT SIMULATOR e CASINO 


brevemente 


e PROCESSADOR DE TEXTO/GESTOR DE LEITOR 
DE CÓDIGO DE BARRAS 






e CAMPANHA 
DE TROCAS 




















e OFERTA 
LANÇAMENTO (1 JOYSTICK + 6 CASSETTES) 


e Compatível SPECTRUM através de Cartridge emuladora 
6 Novas funções: STICK/ON ERR/FREE/DELETE/SOUND 
€ 3 Canais de som independentes e programáveis 









TABELA COMPARATIVA 


SPECTRUM - 
Z80-A 













| Microprocessador 
pp + 


RAM fisica 48Kk 48k ABk 


RAM utilizável 41472 Bytes 41472 Bytes 












Monitor vídeo composto monocromático 
(fósforo verde) 


































































16K 16K 24K NEPTUN 156 
“2 "| DaxãD au DAxBa | 24x40 D4x64 24x00 | 2D4x3P 24x64 24xB) e impedância de entrada: 75 ohm 
————— + + e Resolução 520 Pontos/linha 
Resolução (Pixel) | 256 x 192 I 256x 192, 512x192 | 256x 192, 512x 192 * Alimentação 220 VAC ou 12 VDC 
Beep Beep Beep e gerad. programável * Ecran: 31 em (12º) 
Joysticks Não | Joystick je > Joystick 
Solid State Software | Não Não Sim 
Gravador | Vulgar Vulgar Vulgar 
Disk Drive | Pode suportar . Pode suportar Pode suporta! 
| “UHF 36 | 





UHF 3€ JHF 36 








Video composto Não Sir Sim 


Ed E 


Interruptor ON/OFF Reset Sim Sir 



































8 + Brigmt = 1: 3 + Bright 3 + Brigh 
Teclado circuito impresso Nac Si! Sim 
ircui integrados 6 | ancas ni 
Circuitos eg d [ MEX PRINTER 2080 IMPRESSORA 
Manual em português Na: ATRICIA 








oOomputagou! 


Garantia 








